使用excel导出时强制覆盖文件

Question

如何制作，如果已经存在同名文件，它将被悄悄覆盖？

Dim oExcel
Dim oBook
Set oExcel = CreateObject("Excel.Application")
Set oBook = oExcel.Workbooks.Open(Wscript.Arguments.Item(0))

'What options to add?
oBook.SaveAs "out.csv", 6

oBook.Close False
oExcel.Quit

Answer 1

使用.DisplayAlerts = False关闭此类问题。