一般来说,我遇到的问题是每当我的代码结束时(见下文):
您能否建议我如何删除上述提示[同时保存/覆盖旧版本的文件]?
Sub Test()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
****rest of the code***
WB1.Save
WB2.Save
WB3.Save
Application.Quit
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
答案 0 :(得分:0)
感谢@Peter_Pesch的建议,决议如下[PS。我在VBA运行时打开了4个文件]:
....
WB1.Save
WB1.Saved = True
WB2.Saved = True
WB3.Saved = True
ActiveWorkbook.Saved = True
Application.Quit
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub