Excel VBA Worksheet_Change事件未触发 透视表筛选代码不运行问题求助

可能导致Worksheet_Change事件未触发的原因如下： #

• 代码存放位置错误
  Worksheet_Change属于工作表专属事件，必须存放在你需要监听C2变更的对应工作表的代码模块中，不能放在ThisWorkbook模块，也不能放在标准模块（如模块1、模块2这类），放错位置时事件不会被系统注册触发。
• C2值变更不属于手动编辑场景
  Worksheet_Change仅响应用户手动编辑单元格、或其他VBA代码主动给单元格赋值的操作，如果C2的值是公式计算得到的动态结果，公式计算导致的数值变更不会触发该事件，这类场景需要改用Worksheet_Calculate事件实现监听。
• 全局事件开关被关闭
  如果之前运行过其他VBA代码，代码中途报错异常退出，没有执行恢复Application.EnableEvents = True的语句，会导致Excel全局事件被禁用。你可以先打开VBA编辑器的立即窗口，执行Application.EnableEvents = True后再测试修改C2。
• 监听的工作表和实际操作的工作表不匹配
  比如你把代码放在了Sheet1的工作表模块中，但实际修改的是Sheet2的C2单元格，自然不会命中事件逻辑。
• If判断逻辑未命中
  如果你把MsgBox写在了If Not Intersect(Target, Range("C2")) Is Nothing的判断内部，也有可能是你的操作没有命中判断条件：比如批量粘贴内容时选区未包含C2，或是操作的单元格范围不符合判断规则。如果MsgBox写在判断外仍无弹窗，可排除该原因。

内容的提问来源于stack exchange，提问作者hopil95479