如题所述
第1个回答 2019-12-19
把下面test中的代码加到你的执行代码最后
Sub
test()
a
=
MsgBox("是否保存?",
vbYesNo,
"提醒!")
If
a
=
vbYes
Then
ThisWorkbook.Save
End
IfEnd
Sub
Sub
test()
a
=
MsgBox("是否保存?",
vbYesNo,
"提醒!")
If
a
=
vbYes
Then
ThisWorkbook.Save
End
IfEnd
Sub