「word マクロ all header 削除」
「word vba ヘッダー クリア」
「wordvba フッター 解除」
といった検索で、このサイト・インストラクターのネタ帳へのアクセスがあります。
ヘッダーやフッターを削除する、Word VBAのコード、Wordマクロを探している方による検索です。
アクティブ文書のヘッダーを削除するサンプルマクロ
以下のようなマクロで、アクティブな文書の、すべてのヘッダーを削除することができます。
Dim sec As Section, hdr As HeaderFooter
For Each sec In ActiveDocument.Sections
For Each hdr In sec.Headers
hdr.Range.Delete
Next
Next sec
End Sub
アクティブな文書の、すべてのセクションにループを回して、
For Each sec In ActiveDocument.Sections
各セクション内の全ヘッダーにループを回して、
For Each hdr In sec.Headers
ヘッダーのRangeオブジェクトを削除しています。
hdr.Range.Delete
アクティブ文書のヘッダー&フッターを削除するサンプルマクロ
以下のようなマクロにすれば、アクティブな文書の、ヘッダーとフッターをすべて削除できます。
Dim sec As Section
For Each sec In ActiveDocument.Sections
Dim hdr As HeaderFooter
For Each hdr In sec.Headers
hdr.Range.Delete
Next hdr
Dim ftr As HeaderFooter
For Each ftr In sec.Footers
ftr.Range.Delete
Next ftr
End Sub
アクティブな文書の全セクションにループを回して、
For Each sec In ActiveDocument.Sections
各セクションの全ヘッダーにループを回して、
For Each hdr In sec.Headers
ヘッダーを削除して、
hdr.Range.Delete
各セクションの全フッターにループを回して、
For Each ftr In sec.Footers
フッターを削除しています。
ftr.Range.Delete
最終更新日時:2024-04-15 15:10
- Newer:自分のできる領域を広げてスイートスポットを拡大する
- Older:折り返して全体を表示するの解除をExcel VBAで
Home » ワードマクロ・Word VBAの使い方 » ヘッダー&フッター » ヘッダー&フッターをWord VBAで削除する