Home » ワードマクロ・Word VBAの使い方 » Documentオブジェクト » Word VBAですべての文章・本文を削除する-StoryRanges(wdMainTextStory).Delete

Word VBAですべての文章・本文を削除する-StoryRanges(wdMainTextStory).Delete

対象:Word2007, Word2010, Word2013

「vba word 全文章削除」
という検索で、このサイト・インストラクターのネタ帳へのアクセスがありました。

[スポンサードリンク]

すべての文章を削除するサンプルマクロ

参考になりそうなシンプルなWordマクロをご紹介しておきます。

Sub 本文全体を削除する()
 ActiveDocument.StoryRanges(wdMainTextStory).Delete
End Sub

上記のマクロを実行すると、アクティブな文書上の、本文のすべての文章が削除されます。

サンプルマクロの解説

ActiveDocumentプロパティでアクティブ文書を表すDocumentオブジェクトを取得して、

すべての文章・本文を削除するWordマクロ

DocumentオブジェクトのStoryRangesプロパティStoryRangesコレクションを取得し、

すべての文章・本文を削除するWordマクロ

StoryRangesコレクションのデフォルトメンバーであるItemメソッドに、

すべての文章・本文を削除するWordマクロ

定数wdMainTextStoryを指定することで、

すべての文章・本文を削除するWordマクロ

本文全体を表すRangeオブジェクトを取得して、そのRangeオブジェクトをDeleteメソッドで削除しているのが、

すべての文章・本文を削除するWordマクロ

上記のマクロです。

本文以外の部分を削除したい場合

本文だけを削除するならば上記のコードでOKですが、ヘッダーに入力されている文字列は削除されません。

本文以外の場所も削除したい場合は、StoryRangesコレクションオブジェクトのItemメソッドに指定する定数を適宜変更してください。

例えば、ヘッダーを削除したいなら、
  ActiveDocument.StoryRanges(wdPrimaryHeaderStory).Delete
です。

最終更新日時:2024-02-23 09:39

[スポンサードリンク]

Home » ワードマクロ・Word VBAの使い方 » Documentオブジェクト » Word VBAですべての文章・本文を削除する-StoryRanges(wdMainTextStory).Delete

「Documentオブジェクト」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.