VBAを使用したOffice 2010 Word文書のアウトラインレベルの確認

Question

提出されたドキュメントを検証するVBAマクロを作成していますが、ドキュメントのアウトラインレベルを確認する方法が見つからないようです全体。私が必要とするのは、Outlining Ribbonで選択されたアウトラインレベル、1-9またはすべてのレベルを伝える方法です。

Answer 1

Word文書の.OutlineLevelプロパティは、Paragraph、ParagraphFormatまたはParagraphs Collectionオブジェクトに適用できます。値wdOutlineLevel1-9またはwdOutlineLevelBodyTextを取ることができる列挙体です。文書、使用中の最初の段落のOutlineLevel見つけるには

：

Dim currOutlineLevel 

With ActiveDocument 
    currOutlineLevel = .Paragraphs(1).OutlineLevel 
End With 

Answer 2

はあなたが後にしている設定は、ファイルに保存されていないアプリケーションの設定です。

次のVBAコード使用して特定のレベルを設定することができます。

は

ActiveWindow.ActivePane.View.Type = wdOutlineView 
ActiveWindow.View.ShowHeading 6 

Answer 3

注意をその呼び出し段落（x）の.OutlineLevelエラー輸出用の反復のWordのアウトラインを作るアウトラインビューでアクティブなドキュメントで呼び出された場合むしろボア。ビューを切り替える必要があります（このビューも直接スクリプト可能ではないようです）。他の誰かが時間を無駄にすることを避けたいと思っています。