Tag: 保存前

SaveAs里面BeforeSave（Excel，VBA）

我想编程Excel来创build备份我的文件，然后再保存它。 但每次我尝试使用它，Excel崩溃。 可以请一些解释我为什么会发生这种情况，即使我插入Application.EnableEvents = False以防止无限循环？ 我使用的代码如下： Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Application.EnableEvents = False ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.Path & "\" & "BackUp_" & Date & "_" & ActiveWorkbook.Name, FileFormat:=52 Application.EnableEvents = True End Sub 预先感谢您的帮助！