you have different possibilities:
'0805 as Text
objSheet.Cells(row, col).NumberFormat = "@"
objSheet.Cells(row, col).Value = YourCellValue.ToString
'add a ' at first character
objSheet.Cells(row, col).Value = "'" + YourCellValue.ToString
Is there a way to modify the way the file is created with vb script? If so, exactly how? or are you referring to inside Excel itself? For the latter, the default formatting would already have discarded the information.
this is done in vb. I do it in "my" Partlister in the same way for outputting to Excel.
Dim objExcel, objSheet
objExcel = CreateObject("Excel.Application")
objSheet = objExcel.ActiveWorkbook.Worksheets(1)
and than you can add any Value to your excel:
objSheet.Cells(row, col).Value = Your Value