美好的一天
我遇到過 VBA 代碼,當單擊特定單元格時,它可以很好地觸發 Excel 中的宏。 見下文:
Option Explicit
私人子工作表_SelectionChange(ByVal Target As Range)
如果 Selection.Count = 1 那麼
If Not Intersect(Target, Range("D4")) 什麼都不是
調用 MyMacro
如果結束
如果結束
END SUB
我正在嘗試將 3 個這樣的場景添加到相同的代碼中,但我沒有編碼經驗,所以故障排除讓我無處可去。 請查看下面我正在嘗試做的示例,並儘可能更正代碼:
Option Explicit
私人子工作表_SelectionChange(ByVal Target As Range)
如果 Selection.Count = 1 那麼
If Not Intersect(Target, Range("D4")) 什麼都不是
調用 MyMacro1
如果結束
如果結束
如果 Selection.Count = 1 那麼
If Not Intersect(Target, Range("E10")) Is Nothing 那麼
調用 MyMacro2
如果結束
如果結束
如果 Selection.Count = 1 那麼
如果不相交(目標,範圍(“G23”))那麼什麼都不是
調用 MyMacro3
如果結束
如果結束
如果 Selection.Count = 1 那麼
如果不相交(目標,範圍(“J33”))那麼什麼都不是
調用 MyMacro4
如果結束
如果結束
END SUB
我期待我創建的各種宏(效果很好)在單擊代碼中註明的單元格時自動運行
任何幫助將不勝感激!