关闭事件前的VBA

时间:2019-04-03 15:58:33

标签: excel vba

我的代码中有2个事件,即关闭之前,保存之前。在保存之前,必须先保存一些条件,否则将无法保存。现在在关闭之前触发时,它将弹出以保存,不保存,取消消息框。当选择保存时,它将在保存函数之前调用,并且像保存函数之前一样引发错误消息。但是在关闭该文件之后。

    Public Sub Workbook_BeforeClose(Cancel As Boolean)

Exit Sub

End Sub

1 个答案:

答案 0 :(得分:0)

我认为我误解了您想描述的内容,但请查看下面的代码是否可以帮助您。

Public Sub Workbook_BeforeClose(Cancel As Boolean)

        Select Case MsgBox("Select what do you want", vbYesNoCancel + vbExclamation, "Atention")
            Case vbYes
                Call Workbook_BeforeSave(True, False)
            Case vbNo
                Application.Quit
            Case vbCancel
                Cancel = True
        End Select

 Exit Sub