如题所述
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If [H1] = "N" Then
MsgBox "关闭前提示"
Cancel = True
Exit Sub
End If
End Sub
要复制到
thisworkbook
If [H1] = "N" Then
MsgBox "关闭前提示"
Cancel = True
Exit Sub
End If
End Sub
要复制到
thisworkbook
温馨提示:答案为网友推荐,仅供参考