Formatting column

[Brent E]

I've got an Excel workbook that contains many license numbers and I need to
format the column so that if a license number has several 0s in front, they
aren't automatically truncated by Excel. I tried general, number, and text
formats but they truncate leading 0s. Any ideas? Thanks.

[cruddell001]

Try using the "custom format" option. Type in 000000000 for the 'type'. Use as many 0's as you have digits in your license plate.

[Edwin Tam]

You may try running the code below which should effectively remove all
leading zero from the selected cells.

Sub truncate_zero()
Dim cell As Object, tmp
For Each cell In Selection.Cells
tmp = cell.Value
If Left(tmp, 1) = 0 Then
Do Until Left(tmp, 1) <> 0
tmp = Right(tmp, Len(tmp) - 1)
Loop
cell.Value = tmp
End If
Next
End Sub


Regards,
Edwin Tam
[email protected]
http://www.vonixx.com


"Brent E" wrote:

> I've got an Excel workbook that contains many license numbers and I need to
> format the column so that if a license number has several 0s in front, they
> aren't automatically truncated by Excel. I tried general, number, and text
> formats but they truncate leading 0s. Any ideas? Thanks.