求助：如何用VBA调出Excel的Conditional Formatting Rules Manager-当前工作表窗口

你可以通过Application.CommandBars.ExecuteMso方法直接调用Excel功能区的内置命令，替换原有代码中Else分支的提示框，实现打开「条件格式规则管理器」并默认显示当前工作表规则的需求。修改后的完整代码如下：

Sub modConditionalFormattingCheck()
    If ActiveSheet.Cells.FormatConditions.Count = 0 Then
        MsgBox "未发现条件格式"
    Else
        ' 调出条件格式规则管理器，默认显示当前工作表
        Application.CommandBars.ExecuteMso "ConditionalFormattingRulesManager"
    End If
End Sub

关键说明： #

• Application.CommandBars.ExecuteMso是调用Excel内置功能区命令的通用方法，参数ConditionalFormattingRulesManager是「条件格式规则管理器」对应的官方IDMso名称。
• 执行该代码后，规则管理器窗口会直接弹出，并且默认选中当前活动工作表（即ActiveSheet），无需手动切换。

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