Publisher) (Sections 物件

文件中所有 Section 物件的集合。

註解

使用 [項目] (索引) ,其中 索引) 是 索引號碼 (以傳回單一 Section 物件。 使用 Sections (索引) , 其中 索引) 是索引 (,也會傳回單一 Section 物件。

使用 [計數] 傳回出版物中的節數。

使用 [新增] (StartPageIndex) ,其中 StartPageIndex 是頁面的索引號碼,以傳回新增至文件的新區段。 如果頁面已包含章節標題,則會傳回「權限遭拒」錯誤。

使用 Section.Delete (索引) ,其中 (索引) 是索引號碼,以從文件中刪除指定的區段。 如果嘗試刪除第一個區段,則會傳回「權限遭拒」錯誤。

範例

下列範例會為使用中文件的第一個區段設定數字格式和起始編號。

With ActiveDocument.Sections.Item(1) 
 .PageNumberFormat = pbPageNumberFormatArabic 
 .PageNumberStart = 1 
End With

下列範例會為使用中文件的第二個區段繼續上一節的編號。

ActiveDocument.Sections(2).ContinueNumbersFromPreviousSection=True

下列範例會顯示第一個開啟文件中的節數。

MsgBox Documents(1).Sections.Count

下述範例會新增一個區段到使用中文件的第二頁。

Dim objSection As Section 
Set objSection = ActiveDocument.Sections.Add(StartPageIndex:=2)

下列範例會刪除使用中文件的所有區段,但第一個區段除外。

注意事項

反覆運算會從最後一個到第一個,以避免在存取 Sections 集合中已刪除的區段時發生「下標超出範圍」錯誤。

Dim i As Long 
For i = ActiveDocument.Sections.Count To 1 Step -1 
 If i = 1 Then Exit For 
 ActiveDocument.Sections(i).Delete 
Next i

方法

屬性

另請參閱

支援和意見反應

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