我正在使用Vbscript将一些数据写入excel然后我将此excel对象保存为txt文件。我的问题是在保存为文本文件后，某些行包含引号“。下面是我的代码可以帮我记录一下。
我的输出文本文件是：
"Rules*V*ZBEA*892**0010*10*IBM-01**"
30,000.00*01/08/2012*21/08/2012****0000013556*01***2600
"Scale value* *********"
这里的问题是第1行和第3行的开头和结尾用引号（“”）。
代码是
Dim objXL1,name
Set objXL1 = CreateObject("Excel.Application")
objXL1.Workbooks.Add
objXL1.Cells(1 ,1) = "Rules*V*ZBEA*892**0010*10*IBM-01** "
objXL1.Cells(2,1) = "30,000.00*01/08/2012*21/08/2012****0000013556*01***2600"
objXL1.Cells(3 ,1) = "Scale value* *********"
name = objXL1.GetSaveAsFilename(,"Text(MS-DOS)(*.txt),*.txt")
objXL1.ActiveWorkbook.SaveAs name ,21 ,,21
objXL1.ActiveWorkbook.Close 0
objXL1.quit
再次问题是我使用SaveAs方法获取文件名。当执行到此行时，隐藏在主IE窗口后面的文件保存对话框是否有任何方法可以使此保存对话框成为焦点？
答案 0 :(得分：0)
我认为这是因为空白。在您的代码中，第一行中有一个尾随空格。
"Rules*V*ZBEA*892**0010*10*IBM-01** "
-----------------------------------^-
如果要导出多个单元格，则需要封装这些单元格以识别单元格值的开始和结束位置。