Borders.ApplyPageBordersToAllSections メソッド (Word)

文書内のすべてのセクションに、指定したページ罫線の書式を適用します。

構文

ApplyPageBordersToAllSections

expression 必須です。 'Borders' コレクションを表す変数。

次の使用例は、作業中の文書で、すべてのセクションに一重線のページ罫線を追加します。

Dim borderLoop As Border 
 
With ActiveDocument.Sections(1) 
 For Each borderLoop In .Borders 
 With borderLoop 
 .LineStyle = wdLineStyleSingle 
 .LineWidth = wdLineWidth050pt 
 End With 
 Next borderLoop 
 .Borders.ApplyPageBordersToAllSections 
End With

関連項目

コレクション オブジェクトの枠線

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。