Publisher) (HeaderFooter 物件

代表主版頁面的頁首或頁尾。

註解

使用 Page.Header 或 Page.Footer 可傳回 HeaderFooter 物件。

使用 Delete 方法可從頁首或頁尾刪除任何現有的內容。 呼叫此方法不會刪除文字框，而只是刪除它的內容。

使用 TextRange 屬性可傳回代表主版頁面頁首或頁尾的 TextRange 物件。 任何頁首或頁尾內容操作都是使用 HeaderFooter 物件的這個屬性來完成。

範例

下列範例會將文字新增至使用中文件之第一個主版頁面的標頭。

Dim objHeader As HeaderFooter 
Set objHeader = ActiveDocument.MasterPages(1).Header 
objHeader.TextRange.Text = "Master Page 1 Header" 

下列範例會刪除出版物中所有主版頁面的所有頁首和頁尾內容。

Dim objMasterPage As page 
For Each objMasterPage In ActiveDocument.masterPages 
 objMasterPage.Header.Delete 
 objMasterPage.Footer.Delete 
Next

下列範例會先刪除任何現有的內容，然後將一些未定案的文字新增至主版頁面的頁首。

Dim objHeader As HeaderFooter 
Set objHeader = ActiveDocument.MasterPages(1).Header 
With objHeader 
 .Delete 
 .TextRange.Text = "<Insert Address Here>" 
End With

方法

• Delete

屬性

• Application
• IsHeader
• Parent
• TextRange

另請參閱

• Publisher 物件模型參考

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。