Truncate Cell text all the time

[Inovic@gmail.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?

[Chip Pearson]

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





<Inovic@gmail.com> wrote in message
news:1130431144.542909.41920@g44g2000cwa.googlegroups.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?
>