当サイトの記事にはプロモーションが含まれています。

VBAを使ってWord文書の特定のページを削除する方法

パソコンパソコン・スマホ教室
スポンサーリンク

皆さん、こんにちは。今日は、VBAを使ってWord文書の特定のページを削除する方法についてお話しします。普段、Wordを使っていて、「このページだけ削除したいな」と思ったことはありませんか?手作業で削除するのも一つの方法ですが、VBAを使えばもっと簡単に、そして効率的に行うことができます。特に、長い文書を扱う方や、定期的に特定のページを削除する必要がある方には、ぜひ知っておいていただきたい内容です。

スポンサーリンク

VBAとは何か?

Wordのイメージ

Wordのイメージ

まず、VBAについて簡単に説明します。VBAとは、Visual Basic for Applicationsの略で、Microsoft Office製品に組み込まれているプログラミング言語です。これを使うことで、WordやExcelの操作を自動化したり、カスタマイズしたりすることができます。例えば、繰り返しの作業を自動化したり、特定の条件に応じて文書を編集したりすることが可能です。

VBAを使って特定のページを削除する方法

では、具体的にVBAを使ってWord文書の特定のページを削除する方法を見ていきましょう。以下の手順で進めていきます。

  1. Wordを開き、AltキーとF11キーを同時に押して、VBAエディタを起動します。
  2. 左側のプロジェクトエクスプローラーで、編集したい文書を選択し、挿入メニューから標準モジュールを選びます。
  3. 新しく作成されたモジュールに、以下のコードを入力します。
vba
Sub DeletePage(pageNumber As Integer)
Dim rng As Range
Set rng = ActiveDocument.GoTo(What:=wdGoToPage, Which:=wdGoToAbsolute, Name:=pageNumber)
Set rng = rng.GoTo(What:=wdGoToBookmark, Name:="page")
rng.Delete
End Sub

このコードは、指定したページ番号のページを削除するものです。例えば、3ページ目を削除したい場合は、`DeletePage 3`と入力して実行します。

実際にVBAを使ってページを削除してみましょう

具体的な手順を以下に示します。

  1. 先ほどのコードを入力したら、VBAエディタを閉じて、Word文書に戻ります。
  2. AltキーとF8キーを同時に押して、マクロの一覧を表示します。
  3. 実行したいマクロ名(例DeletePage)を選択し、実行ボタンをクリックします。
  4. 削除したいページ番号を入力するダイアログが表示されるので、該当のページ番号を入力し、OKをクリックします。

これで、指定したページが削除されます。

注意点と補足情報

VBAを使ってページを削除する際の注意点をいくつか挙げておきます。

  • このマクロは、文書内のページ番号を基準にしています。ページ番号が正しく設定されていない場合、意図しないページが削除される可能性があります。
  • 削除操作は元に戻すことができますが、大切な文書を編集する前には、必ずバックアップを取るようにしましょう。
  • このマクロは、空白ページ特定の内容を含むページの削除にも応用できます。

よくある質問や疑問

Q1: VBAを使うのは初めてですが、難しくないですか?

最初は少し戸惑うかもしれませんが、基本的な操作やコードを覚えれば、非常に便利に使えます。今回のような簡単なマクロから始めてみると良いでしょう。

Q2: マクロを実行したら、意図しないページが削除されました。どうすればいいですか?

まず、CtrlキーとZキーを同時に押して、操作を元に戻してみてください。また、ページ番号の指定が正しいか確認し、再度マクロを実行してみてください。

Q3: このマクロは他のWord文書でも使えますか?

はい、使えます。ただし、文書ごとにマクロを設定する必要があります。共通で使いたい場合は、テンプレートにマクロを組み込む方法もあります。

まとめ

今回は、VBAを使ってWord文書の特定のページを削除する方法をご紹介しました。最初は少し難しく感じるかもしれませんが、慣れてくると作業効率が格段に上がります。ぜひ試してみてください。他にも疑問やお悩み事があればお気軽にLINEからお声掛けください。

この記事を書いた人
この記事を書いた人

企業の情報システム部門で10年以上、PC・アカウント・社内ネットワーク・Microsoft 365/Google Workspace運用を担当。年間数百件の問い合わせ対応(PC不調、メール送受信、Excel/Word資料、Teams会議、スマホ連携など)を通じて、初心者がつまずくポイントを「再現→原因切り分け→最短解決」の手順に落とし込んできました

現場や身近で実際に起きたトラブルをベースに、手順だけでなく「なぜそうなるか」「失敗しやすい落とし穴」「安全な設定(セキュリティ)」まで含めて解説します。

相談窓口(問い合わせ/LINE等)を設け、記事で解決しないケースも個別にサポートしていますので「パソコンが急に動かなくなった」「スマホの設定がわからない」などの悩みは一人で抱え込まず、お気軽にご相談ください。

【お問い合わせは下記URLから】
https://m32006400n.xsrv.jp/inquiry-form/

【公式LINEは下記URLから】
https://lin.ee/t8TDjcj

uri uriをフォローする
スポンサーリンク
よかったらシェアしてね! /
uri uriをフォローする

コメント

タイトルとURLをコピーしました