Macro to remove leading zeroes

[howard]

I need code to remove leading zeroes in Col N from row 2 onwards on Sheet2

See sample data below. The data can have any number of leading zeroes

0025795
0957825
00000758



Your assistance is most appreciated in resolving this

 

[Michael M]

Try using

=TRIM(VALUE(A1))

copy down as required

 

[howard]

Thanks for the reply

 

[Rick Rothstein]

Give this code a try...

Sub RemoveLeadingZeros()
  With Columns("N").SpecialCells(xlConstants)
    .NumberFormat = "General"
    .Value = .Value
  End With
End Sub

 

[howard]

Thanks for the help Rick, much appreciated