This free Excel macro formats a selection of cells as Text in Excel. This macro applies the Text number format to cells in Excel. This means that all contents of a cell are treated as text and, though you can display numbers in the same cells, text is formatted to align to the left of a cell. This means that numbers with text formatting will appear on the left side of a cell.
Sub Format_Cell_Text()
Selection.NumberFormat = "@"
End Sub