vba - 如何使用 VBA 在 PowerPoint 中激活（使可见/启用/显示）选择窗格？

Question

在 PowerPoint 2013 中，“选择”窗格属性可从 CommandBar 对象获得，如下所示：

Application.CommandBars("Selection")

（请注意，对于 PowerPoint 2010 和 2007，名称为“选择和可见性”）

在 UI 中使用 Alt+F10 显示选择窗格时，以下两个属性切换为 true：

Application.CommandBars("Selection").Visible
Application.CommandBars("Selection").Enabled

但是，当尝试以编程方式将这些设置为 true 时，.Visible=True 语句会导致发生未指定的自动化错误，并且 .Enabled=True 语句会执行但不会更改此属性的状态。

但是，奇怪的是，如果在 PowerPoint 首次运行时使用 Alt+F10 来显示和隐藏选择窗格，那么这两行代码就可以工作了！我检查了 Alt+F10 之前和之后的所有属性，只有 .Visible 和 .Enabled 被切换。

我怎样才能可靠且最好地显示选择窗格而不必走 SendKeys 路线？

Answer 1

如果您只想展示它，请尝试：

    If Not CommandBars.GetPressedMso("SelectionPane") Then CommandBars.ExecuteMso ("SelectionPane")