Truncate Cell text all the time
 

I have the need to trucate the contents of my cells regardless of
whether or not there is content in the adjoining cell. Can anyone tell
me how to do this?

Truncate Cell text all the time
 

You could use code like the following:

Dim Rng As Range
For Each Rng In Range("A1:A10")
If Len(Rng(1,2).Text) < 0 Then
Rng.Value = Left(Rng.Text,3) ' truncate to 3
characters
End If
Next Rng


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





wrote in message
ups.com...
I have the need to trucate the contents of my cells regardless
of
whether or not there is content in the adjoining cell. Can
anyone tell
me how to do this?