如何让Excel动作按钮根据单元格值选择运行对应宏？

1. 新增判断宏作为中间层 #

不用修改动作按钮的绑定逻辑，新增一个负责判断的宏，让动作按钮直接触发这个宏，由它决定后续执行哪个宏。

假设控制和单元格是Balance工作表的A1（可根据实际位置修改），编写以下VBA代码：

Sub CheckAndRunMacro()
    ' 读取控制和单元格的值
    Dim controlSum As Double
    controlSum = ThisWorkbook.Worksheets("Balance").Range("A1").Value
    
    ' 根据控制和判断执行对应宏
    If controlSum <> 0 Then
        ' 控制和不为0，执行正常宏（替换成你原来的宏名称）
        Call YourNormalMacroName
    Else
        ' 控制和为0，执行Do Nothing宏
        Call DoNothing
    End If
End Sub

' Do Nothing宏（仅切换到Accounts Payable工作表）
Sub DoNothing()
    ThisWorkbook.Worksheets("Accounts Payable").Activate
End Sub

2. 修改动作按钮的绑定宏 #

右键点击动作按钮 → 选择「指定宏」，在弹出窗口中选择新建的CheckAndRunMacro，点击确定。

3. 注意事项 #

• 将代码中的YourNormalMacroName替换为你原本编写的、用于设置透视表筛选的宏名称
• 若控制和单元格不是Balance!A1，修改代码中对应的工作表和单元格引用即可
• 这种通过中间宏实现逻辑分支的方式，比直接在动作按钮上做判断更稳定、易维护

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