HeaderFooter オブジェクト (Word)
ヘッダーまたはフッターを表します。 HeaderFooter オブジェクトは HeadersFooters コレクションのメンバーです。 HeadersFooters コレクションには、指定された文書のセクションのすべてのヘッダーおよびフッターが含まれます。
注釈
単一の HeaderFooter オブジェクトを取得するには、ヘッダー (インデックス) またはフッター (Index) を使用します。index は WdHeaderFooterEvenPages、wdHeaderFooterFirstPage、または wdHeaderFooterPrimary のいずれかの定数です。 次の使用例は、作業中の文書内の最初のセクションのプライマリ ヘッダーおよびプライマリ フッターの文字列を変更します。
With ActiveDocument.Sections(1)
.Headers(wdHeaderFooterPrimary).Range.Text = "Header text"
.Footers(wdHeaderFooterPrimary).Range.Text = "Footer text"
End With
HeaderFooter オブジェクトに対して HeaderFooter プロパティを使用して、 Selection オブジェクトを取得することもできます。
注:
[!メモ] HeaderFooter オブジェクトを HeadersFooters コレクションに追加することはできません。
PageSetup オブジェクトに対して DifferentFirstPageHeaderFooter プロパティを使用して、先頭ページに異なるヘッダーやフッターを指定します。 次の使用例は、作業中の文書の先頭ページのフッターに文字列を挿入します。
With ActiveDocument
.PageSetup.DifferentFirstPageHeaderFooter = True
.Sections(1).Footers(wdHeaderFooterFirstPage) _
.Range.InsertBefore _
"Written by Joe Smith"
End With
PageSetup オブジェクトに対して OddAndEvenPagesHeaderFooter プロパティを使用して、奇数ページと偶数ページに異なるヘッダーとフッターを指定します。 OddAndEvenPagesHeaderFooter プロパティの値が True である場合、定数 wdHeaderFooterPrimary を使用すると、奇数ページのヘッダーおよびフッターを取得することができ、定数 wdHeaderFooterEvenPages を使用すると、偶数ページのヘッダーおよびフッターを取得することができます。
PageNumbers オブジェクトに対して Add メソッドを使用して、ページ番号をヘッダーまたはフッターに追加します。 次の使用例は、作業中の文書内の最初のセクションに含まれる先頭ページのフッターにページ番号を追加します。
With ActiveDocument.Sections(1)
.Footers(wdHeaderFooterPrimary).PageNumbers.Add
End With
プロパティ
| 名前 |
|---|
| アプリケーション |
| Creator |
| Exists |
| インデックス |
| IsHeader |
| LinkToPrevious |
| PageNumbers |
| Parent |
| Range |
| Shapes |
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。