按ALT+F11打開VBA編輯窗口,如果只在其中壹張工作表觸發事件,那麽雙擊左邊工作表名稱,如果要在當前工作簿所有工作表觸發事件,請雙擊左邊ThisWorkbook,將以下代碼粘貼上去:
Private?Sub?Workbook_SheetSelectionChange(ByVal?Sh?As?Object,?ByVal?Target?As?Range)
If?Target.Address?=?"$A$1"?Then
MsgBox?"妳單擊了A1單元格,觸發了事件!",?vbOKOnly,?"測試"'妳可以在這裏編寫妳其它的代碼
End?If
End?Sub
上述代碼,實現單擊A1單元格時觸發事件,如要改為其它單元格,請修改上述代碼。
附圖,希望能幫到您。