VBAを使用してOffice 2007リボンから値を読み取る

Question

VBAを使用して、Word 2007リボンのテキスト（コンボボックス）コントロールの値を確認できますか？

「ホーム」で現在選択されているフォント名を読みたいとしますタブ。

IAccessible リボンとの some インタラクション（つまり列挙）を実行しますが、コントロール値を読み取ることはできないようです。別の方法がありますか、またはVBAが完全にロックアウトされていますか？

Answer 1

リボンにアクセスして組み込みプロパティを読み取ることはできないと思います。 フォント名の特定の例では、次を使用できます。

Msgbox Application.Commandbars.Findcontrol（ID：= 1728）.Text

このアプローチを他の情報に適応させることができるかもしれません。