Manipulating Data in a row

[Guest]

Hello,

How do I change data in a column via VBA. Here's what I am referring to: In
column A I have data that looks like this
0001
0002
0003

I need to take off the leading 0 so it looks like this:
001
002
003

Any help would be appreciated !

Developer

 

[Cesar Zapata]

one way.

Sub takezero()

Dim cell As Range
For Each cell In Range("A1:A100")
cell.Value = Right(cell.Value, Len(cell.Value) - 1)
Next cell



End Sub

 

[Tom Ogilvy]

for each cell in selection
cell.Value = "'" & Right(cell.Text,3)
Next

This assumes the zeros are not produced using a custom format.
If that is the case, just change the custom format.

 

[Guest]

Tom:

Thanks. This worked fine and what was needed..

Thanx again