excel - Excel 中工作表更改事件的错误？

Question

Sheet1模块中的简单命令:

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
    Range("J5:M5").ClearContents
End Sub

导致 Excel 崩溃。

Answer 1

您将进入无限循环。当您清除单元格时，您将重新激活宏，然后当您清除单元格时，您将重新激活宏，然后当您清除单元格时......

在进行更改之前禁用事件并使用

重新启用它们

Application.EnableEvents = False
    Range("J5:M5").ClearContents
Application.EnableEvents = True

---

您可能还想考虑将其应用于特定范围。您确实希望对此工作表进行任何更改来触发您的宏吗？或者您正在寻找特定地区的变化？如果是这样，请指定区域，并在该区域与更改的单元格相交(重叠)时运行宏。