HeaderFooter.Index プロパティ (Word)
指定したヘッダーまたはフッターの文書またはセクションを表す WdHeaderFooterIndex を返します。 読み取り専用です。
構文
式。インデックス
expression 必須です。 'HeaderFooter' オブジェクトを表す変数。
例
次の使用例は、指定された変数が先頭ページのヘッダーを参照している場合に、現在の文書内の先頭ページのヘッダーに図形を追加します。
Sub ChangeFirstPageFooter()
Dim hdrFirstPage As HeaderFooter
Set hdrFirstPage = ActiveDocument.Sections(1).Headers(wdHeaderFooterFirstPage)
If hdrFirstPage.Index = wdHeaderFooterFirstPage Then
With hdrFirstPage.Shapes.AddShape(Type:=msoShapeHeart, _
Left:=36, Top:=36, Width:=36, Height:=36)
.Fill.ForeColor.RGB = RGB(Red:=255, Green:=0, Blue:=0)
End With
End If
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。