Sections オブジェクト (Word)
選択範囲、範囲、またはドキュメント内の Section オブジェクトのコレクション。
Sections プロパティを使用して Sections コレクションを取得します。 次の使用例は、作業中の文書の最後のセクションの末尾に文字列を挿入します。
With ActiveDocument.Sections.Last.Range
.Collapse Direction:=wdCollapseEnd
.InsertAfter "end of document"
End With
Add メソッドまたは InsertBreak メソッドを使用して、新しいセクションを文書に追加します。 次の使用例は、作業中の文書の先頭に新しいセクションを追加します。
Set myRange = ActiveDocument.Range(Start:=0, End:=0)
ActiveDocument.Sections.Add Range:=myRange
myRange.InsertParagraphAfter
次の使用例は、作業中の文書のセクション数を表示し、選択範囲の最初の段落の前にセクション区切りを追加し、再びセクション数を表示します。
MsgBox ActiveDocument.Sections.Count & " sections"
Selection.Paragraphs(1).Range.InsertBreak _
Type:=wdSectionBreakContinuous
MsgBox ActiveDocument.Sections.Count & " sections"
単一の Section オブジェクトを返すには、Sections (index) を使用します。index はインデックス番号です。 次の使用例は、作業中の文書の最初のセクションで左右のページ余白を設定します。
With ActiveDocument.Sections(1).PageSetup
.LeftMargin = InchesToPoints(0.5)
.RightMargin = InchesToPoints(0.5)
End With
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。