Deleting spaces before and after words?

[hfarhadi2002]

How cal I systematically delete spaces before or after (or both, before and after) words in a long range of cells?. Thanks.

 

[VoG]

In a spare column use

=TRIM(A1)

and fill down as far as needed.

 

[lenze]

Or by code

Sub TrimMe()
Dim cl as Range
For each cl in ActiveSheet.UsedRange
cl = Trim(cl)
Next cl
End Sub

lenze