如何将001写入Excel而不是1

我从VBscript代码中将以下行写入Excel文件

excelFile.write("001" & vbTab) 

但是，当我检查的Excel它有值1而不是001

我怎样才能说服excel从VB脚本“不帮我”？

我不能改变所有的用户的Excel。 我需要从VBScript中完成 。

当我写入txt文件时，数字是正确的。

Answer 1

当你提到一个文本文件，我相信execFile是一个文本stream，写一个制表符分隔文件，稍后导入到Excel中。 那么你应该（全部）引用（全部）文本列中的数据：

 excelFile.write """001""" & vbTab 

您可能必须在导入规范和/或schema.ini文件中声明这一点。

Answer 2

'首先在Excel中select整列，右键单击并select“格式单元格”，然后input000

'vbscript使列A格式000中的任何单元格如下所示

 enter code here Set xl = CreateObject("Excel.Application") xl.Visible =False Set wb1 = xl.WorkBooks.Open("c:\Test.xls") xl.DisplayAlerts = False xl.columns("A:A").NUMBERFORMAT="000" wb1.Save xl.displayalerts=false xl.Quit Set wb1 = nothing Set xl = Nothing 

Answer 3

将您正在写入的单元格的格式从“常规”更改为“自定义”“000” – 这将使您input3位数字

如果你需要从VB自己做到这一点，你应该能够做到这样的事情：

  Cells.Select With Selection .NumberFormat = "000" End With 

Answer 4

这是解决我的问题

 excelFile.write("="""001"""" & vbTab) 

从这里 ：

Answer 5

尝试这个：

 excelFile.write("'001") 

我只是把'前面的0。