Remove Spaces From Entire Column VBA
Solution 1:
you could start below code which will replaces all spaces in A column without looping through each cell.
Sub Macro1()
' replace spaces with ''
Columns("A:A").Replace What:=" ", Replacement:="", LookAt:=xlPart, SearchOrder:=xlByRows
End Sub