excelvba取消关闭工作簿代码用不了
如图,还是会弹出对话框
一个笨办法,借用一个单元格传递参数。
Private Sub Workbook_BeforeClose(Cancel As Boolean)
UserForm1.Show
Cancel = Sheet1.Range("xfd1")
Sheet1.Range("xfd1") = ""
End Sub
Private Sub 不保存0_Click()
Sheet1.Range("xfd1") = True
Unload Me
End Sub
重装程序试试
上一篇:怎么将视频倒序播放再输出?
热门标签: