在Excel VBA中,如果需要使Excel事件無效以方便用戶的操作體驗,可通過VBA使Excel事件無效。Excel2003可通過VBA宏使Excel事件無效。
使Excel事件無效的方法:
首先按“Alt+F11”組合鍵,Excel2003打開代碼編輯器,單擊“插入”菜單-“模塊”,雙擊插入的模塊,在右側的代碼窗口中輸入:
Sub Excel_Partner()
Application.EnableEvents = False
ActiveWorkbook.Save
MsgBox "Excel事件已無效,下面將恢復!"
Application.EnableEvents = True
ActiveWorkbook.Save
End Sub
按F5運行鍵運行程序,即可使Excel事件無效。