VB script: 1 and 001

[yky]

I have a VB script with the following code:

cell.offset(1,-2).value = cell.offset(0,-2).value

This copies the cell value in one cell to the next cell in the same column.

It works. However, the original value is 001 but, after copying, the new value is 1, not 001.

What do I do to make the copied value also 001, not just 1? Thanks.

 

[MrKowz]

Format the destination column as Text, then run the code.

 

[xenou]

Maybe:
cell.Offset(1, -2).NumberFormat = "@"
cell.Offset(1, -2).Value = cell.Offset(0, -2).Value