Modifiying a text number ( 12345 ) to have exactly 6 digit with a 0 in front

  • Thread starter Thread starter simon.guertin
  • Start date Start date
S

simon.guertin

Hi, How can I parse my excell column that contains numbers
(I changed them to be text) I want to put zeros in front
so the number has 6 digit. the number may have 3 4 or 5
digit so I need to fill 0 in front so it is 001234
thank you

Simon
 
Dim i as long, cell as Range
i = 1
do while not isempty(cells(i,1))
set cell = cells(i,1)
cell.Value = "'" & Right("000000" & cell.value,6)
i = i + 1
Loop


Change the 1 to refer to the column you want to parse.
 
OK it's fine I found out how to make your code work. I am
new with macros and excell!

Simon
 
If you don't want to change them to text but just want leading zeros, you
can also use a custom format. Highlight the cells, right click and select
Format Cells, click the Number tab, select Custom from the list of options
and then in the Type box, type 000000.

- John Michl
 
Back
Top