匿名用戶
  週一,二月06 2023
  0 回复
  1.9K訪問
0
投票
復原
美好的一天

我遇到過 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



我期待我創建的各種宏(效果很好)在單擊代碼中註明的單元格時自動運行


任何幫助將不勝感激!
有沒有為這個職位尚未作出回复。