VBScript覆盖文件
问题描述:
我正在使用以下脚本将Excel文件转换为CSV制表符分隔的txt文件。VBScript覆盖文件
xls = "C:\Ristken Data Load\Wade SPIFF log file"
csv = "c:\Ristken Data Load\Wade SPIFF log file"
Set oExcel = CreateObject("Excel.Application")
Set oBook = oExcel.Workbooks.Open(xls)
oBook.Worksheets(2).Activate
oBook.Worksheets(2).Rows("1:4").Delete
oBook.SaveAs csv, -4158
oBook.Close True
oExcel.Quit
我想的东西添加到这个脚本,这样,它在每次运行而无需弹出框,询问您是否要覆盖现有文件时,将覆盖txt文件。
答
更容易,那么我认为它会。
xls = "C:\Ristken Data Load\Wade SPIFF log file"
csv = "c:\Ristken Data Load\Wade SPIFF log file"
Set oExcel = CreateObject("Excel.Application")
Set oBook = oExcel.Workbooks.Open(xls)
oBook.Application.DisplayAlerts = False
oBook.Worksheets(2).Activate
oBook.Worksheets(2).Rows("1:4").Delete
oBook.SaveAs csv, -4158
oBook.Close True
oExcel.Quit
这看起来是一个重复[如何使用自动覆盖workbook.saveas(http://*.com/questions/14634453/how-to-use-workbook-saveas-with-automatic -overwrite)。请查看这个问题的答案,如果这同样适用于您的问题。 – fujiFX 2015-02-23 22:48:38