高级宏命令
7禁止保存或另存的命令
PrivateSubWorkbook_BeforeSaveByValSaveAsUIAsBoolea
Ca
celAsBoolea

MsgBox