HeadingStyles オブジェクト (Word)

目次または図表目次を編集するときに使用するスタイルを表す HeadingStyle オブジェクトのコレクションです。

注釈

HeadingStyles プロパティを使用して HeadingStyles コレクションを取得します。 次の使用例は、作業中の文書の最初の目次を表す HeadingStyles コレクションの項目数を表示します。

MsgBox ActiveDocument.TablesOfContents(1).HeadingStyles.Count

Add メソッドを使用して、 HeadingStyles コレクションにスタイルを追加します。 次の使用例は、作業中の文書の先頭に目次を追加し、目次を作成するときに使用するスタイルの一覧にタイトルのスタイルを追加します。

Set myToc = ActiveDocument.TablesOfContents.Add _ 
 (Range:=ActiveDocument.Range(0, 0), UseHeadingStyles:=True, _ 
 LowerHeadingLevel:=3, UpperHeadingLevel:=1) 
myToc.HeadingStyles.Add Style:="Title", Level:=2

引数 Index にインデックス番号を指定し、 HeadingStyles (Index) を使用して、単一の HeadingStyle オブジェクトを取得します。 インデックス番号は、 HeadingStyles コレクションでのスタイルの位置を表します。 次の使用例は、作業中の文書の先頭にタイトルのスタイルから作成した図表目次を追加し、 HeadingStyles コレクションの最初のスタイルの名前を表示します。

Set myTOF = ActiveDocument.TablesOfFigures.Add _ 
 (Range:=ActiveDocument.Range(0, 0), AddedStyles:="Title") 
MsgBox myTOF.HeadingStyles(1).Style

関連項目

Word オブジェクト モデル リファレンス

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。