Question

我有一个vbscript，我想用它格式化我在SQL中使用存储过程导出的文件。我最终会使用批处理来安排这个，所以它是自动的。我想在完成它之前先让脚本工作。

我遇到的问题是更改未保存在我的新文件中。

到目前为止，我有;

Dim objXL
Dim wb
Dim ws

Set objXL = CreateObject("Excel.Application")
objXL.Visible = False
objXL.DisplayAlerts = False

Set wb = objXL.Workbooks.Open("H:\Pricing.xls")
Set ws = wb.Worksheets("Pricing")

ws.Rows(1).Font.Bold=True
wb.SaveAs("H:\Pricing2.xls")

objXL.Quit

如果我将objXL.Visible更改为True，我可以看到第一行确实在创建新文件和关闭之前变为粗体。但是，当我手动打开Pricing2.xls时，该行不再是粗体。

格式变化的任何想法都没有坚持下去？

干杯

Answer 1

SQL生成文件的文件格式导致我的问题，声明SaveAs上的fileformat解决了这个问题;

wb.SaveAs "H:\Pricing2.xls", FileFormat -4143

VB脚本保存不保存格式更改

1 个答案: