Removing preceeding spaces

  • Thread starter Thread starter wjd01
  • Start date Start date
W

wjd01

When opening specific text documents in excel, the text is
captured with 6 or 7 preceeding spaces (this is
expected). I'm looking for a macro that will remove only
the preceeding spaces, but not touch any spaces that
appear after the first character of text. Is there a
macro that can remove these? I have tried to setup a
macro that copies and pastes values...etc. but to no
avail. The spaces are always carried along.

Thanks for your suggestions.

wjd01
 
from vba help for trim
LTrim, RTrim, and Trim Functions
Returns a Variant (String) containing a copy of a specified string without
leading spaces (LTrim), trailing spaces (RTrim), or both leading and
trailing spaces (Trim).

Syntax

LTrim(string)

RTrim(string)

Trim(string)

The required string argument is any valid string expression. If string
contains Null, Null is returned.
 
The LTrim function will trim only spaces on the left, leaving the
rest intact. Try something like


Sub AAA()
Dim Rng As Range
For Each Rng In Range("A1:A10") ' << CHANGE Range
Rng.Value = LTrim(Rng.Text)
Next Rng
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
 
Back
Top