覆蓋現有文件excel vba

Question

open_book.SaveAs Filename:="E:\MF\data\" & com_tick_ask & ".xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

這是將文件另存為xlsx的代碼，但是我想覆蓋現有文件。 並關閉此工作簿。 誰能幫忙...

Answer 1

抱歉給您帶來麻煩。 我得到了答案。

我只需要在我的SaveAs語句之前放這行代碼...

Application.DisplayAlerts = False

並必須在其后立即放置這行代碼...

Application.DisplayAlerts = True

例如

Application.DisplayAlerts = False
open_book.SaveAs Filename:="E:\MF\data\" & com_tick_ask & ".xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
Application.DisplayAlerts = True