vba - 如何动态禁用和启用宏？

Question

我想测试我制作的 Excel VBA 应用程序。
然而，VBA 代码会扰乱单元格的可见性，这在编辑工作表时会很麻烦。

是否有一个选项可以动态启用和禁用宏，而无需

Close the sheet
Change the macro settings
Reopen the sheet
Close the sheet
Change the macro settings.
etc.

Answer 1

据我所知，您无法即时从打开的工作簿中启用/禁用宏。
然而，您不必这样做，因为宏只有在用户点击时才会触发。

我会看到的唯一情况是事件过程(Worksheet_Change 或其他)。
然后，您可以创建过程来激活/停用事件并从工作簿中的按钮调用它们:

Sub enableEvents()
    Application.EnableEvents = True
End Sub

Sub disableEvents()
    Application.EnableEvents = False
End Sub

您还可以尝试 Chris Pearson website 中的这些提示使用全局变量，您可以根据需要进行更改:

Public AbortChangeEvent As Boolean

然后检查是否:

Private Sub Worksheet_Change(ByVal Target As Range)
    If AbortChangeEvent = True Then
        Exit Sub
    End If
    '
    ' rest of code here
    '
End Sub