Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
droping leading zeros when writing to a file
My problem is that VBA is writing the numbers to a file PATH but it
drops the leading zeros. I already tried to make them strings but if I do that then it adds parenthesis to the "string" which I dont want. I dont understand why it is not writing EXACTLY what I am telling it to output to file. Please help, thanks. Colin Marker Code - intFile = FreeFile Open PATH For Append As #intFile colIndex = 1 rwIndex = 1 Do Until Cells(rwIndex, colIndex) = "" Write #intFile, 0.53, 5.24, 0.15, -0.58, -0.862 rwIndex = rwIndex + 1 Loop Close #intFile |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
droping leading zeros when writing to a file
Hi Colin,
Use Print rather than Write. This will work as you wish: Print #intFile, 0.53, 5.24, 0.15, -0.58, -0.862 In addition, I assume you're taking this data from your worksheet. Don't forget you can always use Format to easily modify the format of the numbers. rwIndex = 1 colIndex = 1 Do Until Cells(rwIndex, colIndex) = "" Do Until Cells(rwIndex, colIndex) = "" Print #intFile, Format(Cells(rwIndex, colIndex),"00.00#") colIndex = colIndex + 1 Loop colIndex = 1 rwIndex = rwIndex + 1 Loop HTH, Gareth wrote: My problem is that VBA is writing the numbers to a file PATH but it drops the leading zeros. I already tried to make them strings but if I do that then it adds parenthesis to the "string" which I dont want. I dont understand why it is not writing EXACTLY what I am telling it to output to file. Please help, thanks. Colin Marker Code - intFile = FreeFile Open PATH For Append As #intFile colIndex = 1 rwIndex = 1 Do Until Cells(rwIndex, colIndex) = "" Write #intFile, 0.53, 5.24, 0.15, -0.58, -0.862 rwIndex = rwIndex + 1 Loop Close #intFile |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Leading zeros won't convert to csv file in Excel ver 6 SP2 | Excel Discussion (Misc queries) | |||
How do i save a csv file to keep leading zeros please? | Excel Discussion (Misc queries) | |||
How do I open a csv file and not have leading zeros eliminated | Excel Discussion (Misc queries) | |||
Loosing Leading zeros in CSV file | Excel Discussion (Misc queries) | |||
CSV File - Leading Zeros | Excel Discussion (Misc queries) |