Page.Footer プロパティ (Publisher)
指定した Page オブジェクトのフッターを表す HeaderFooter オブジェクトを返します。 読み取り専用です。
構文
式。フッター
式Page オブジェクトを表す変数。
戻り値
HeaderFooter
注釈
このプロパティは、マスター ページにのみです。 Pages コレクションから返される Page オブジェクトから Footer プロパティにアクセスすると、"この機能はマスター ページ専用です" というエラーが返されます。
このプロパティにアクセスすることによって指定されたマスター ページに新しい HeaderFooter オブジェクトが作成されます。
例
次の使用例は、 HeaderFooter オブジェクトを作成し、最初のマスター ページのフッターに設定。
Dim objFooter As HeaderFooter
Set objFooter = ActiveDocument.MasterPages(1).Footer
フッターのコンテンツを操作するのには、 フッター のプロパティによって返される HeaderFooter オブジェクトを使用できます。 次の例では、最初のマスター ページの HeaderFooter オブジェクトの一部のプロパティを設定します。
With ActiveDocument.masterPages(1)
With .Header
.TextRange.Text = "Windows" & Chr(13) & "Office" & Chr(13) & "Internet Explorer"
With .TextRange.ParagraphFormat
.SetListType Value:=pbListTypeBullet, BulletText:="*"
.Alignment = pbParagraphAlignmentLeft
End With
End With
With .Footer
.TextRange.Hyperlinks.Add Text:=.TextRange, _
Address:="https://www.tailspintoys.com", _
TextToDisplay:="Tailspin"
End With
End With
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。
フィードバック
https://aka.ms/ContentUserFeedback」を参照してください。
以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバック メカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバック システムに置き換えます。 詳細については、「フィードバックの送信と表示