Hi there,

You could use a simple loop for this. Here is an example ...

Sub DeleteAllLeadingSpacesPlease()
Dim c as Range
For each c in Range("A1:Z1")
c.Value = Ltrim(c.Value)
Next c
End Sub

Change the range to suit.

HTH

--
Regards,
Zack Barresse, aka firefytr
To email, remove NOSPAM


"lookin" wrote in message
oups.com...
I imported text and need to Ltrim all the cells in a given row. How do
I do this?