编写Word 2010中的导航窗格

Question

我正在尝试找到一种方法来编写Word 2010中的新导航窗格，以便在用户选择文档中的图片时更改选项卡。我可以使用WindowSelectionChange(ByVal Sel As Selection)捕获选择更改，但我无法弄清楚如何将标签从“浏览标题”更改为“浏览页面”，这就是我想要的。

Answer 1

可以使用iAccessible！

Dim As IAccessible

Set oIA = CommandBars("Navigation")

oIA.Visible = True

然后深度递归地找到一个accName="Navigation"和accRole=38

的孩子

然后其索引为3的孩子有accValue=NAVBAR和accRole=60

然后NAVBAR的孩子2就是你所需要的。

 .accDoDefaultAction CHILDID_SELF

Answer 2

根据此thread的MVP，它不可编程/可搜索。