Format Column to display leading zeros.

[Glenn Buchanan]

Using an external program with a language very similar to VB I have a script
that uses CreateObject to create a new workbook and fill with data. All well
and good. I have one column that is filled mostly with numbers where I need
to see any leading zeros.
How would I format this column before filling it? Changing the format after
the data is entered results in missing leading zeros.
With xl
..ActiveSheet.Columns("F:F").NumberFormat = ?

Regards,
Glenn

 

[GTVT06]

Using an external program with a language very similar to VB I have a script
that uses CreateObject to create a new workbook and fill with data. All well
and good. I have one column that is filled mostly with numbers where I need
to see any leading zeros.
How would I format this column before filling it? Changing the format after
the data is entered results in missing leading zeros.
With xl
.ActiveSheet.Columns("F:F").NumberFormat = ?

Regards,
Glenn

The ZipCode format alows leading 0's Example:
With xl
.ActiveSheet.Columns("F:F").NumberFormat = "0000"

 

[JLGWhiz]

Look here:

http://support.microsoft.com/kb/81518

 

[Peter T]

as text -

rng.NumberFormat = "@"

Regards,
Peter T

 

[Glenn Buchanan]

Thanks to all who replied to my post.
After experimenting I found Peter's suggestion worked the best for my
variable length data.
Thanks again.
Glenn.