共用方式為

PageNumbers.HeadingLevelForChapter 屬性 (Word)

  • 發行項

會傳回或設定套用至文件中的章節標題標題階層樣式。 讀取/寫入的 Long。

語法

expression。 HeadingLevelForChapter

表達 代表 'PageNumbers' 物件的變數。

註解

HeadingLevelForChapter 屬性可以是介於 0 (零) 到 8，對應至標題階層 1 到 9。

您可以建立包含章節編號的頁尾頁前，文件標題必須已從 項目符號及編號] 對話方塊中使用樣式的大綱編號的格式套用。 為達成此目的 Visual Basic 中，使用 ApplyListTemplate 方法。

範例

此範例的第一個部分會建立新的文件、 新增章節標題和分頁符號與使用上次大綱編號的格式的文件所列 的項目符號及編號 ] 對話方塊中的格式。 範例的第二個部分會置中的頁面數字相加-包括在章節編號-頁首;小寫羅馬數字在章節編號與頁碼。 第一個標題階層用於章數字及小寫羅馬數字所用的頁碼。

Dim intLoop As Integer 
Dim hdrTemp As HeaderFooter 
 
Documents.Add 
For intLoop = 1 To 5 
 With Selection 
 .TypeParagraph 
 .InsertBreak 
 End With 
Next intLoop 
ActiveDocument.Content.Style = wdStyleHeading1 
ActiveDocument.Content.ListFormat.ApplyListTemplate _ 
 ListTemplate:=ListGalleries(wdOutlineNumberGallery) _ 
 .ListTemplates(7) 
 
Set hdrTemp = ActiveDocument.Sections(1) _ 
 .Headers(wdHeaderFooterPrimary) 
 
With hdrTemp.PageNumbers 
 .Add PageNumberAlignment:=wdAlignPageNumberCenter 
 .NumberStyle = wdPageNumberStyleArabic 
 .IncludeChapterNumber = True 
 .HeadingLevelForChapter = 0 
 .ChapterPageSeparator = wdSeparatorEnDash 
End With

另請參閱

PageNumbers 集合物件

支援和意見反應

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