初心者でもできる！Word VBAで表の行を削除する方法

Wordで文書を作成していると、表の行を削除したい場面がよくありますよね。特に、VBA（Visual Basic for Applications）を使うと、手作業では面倒な作業も自動化できてとても便利です。今回は、初心者の方でもわかりやすく、Word VBAを使って表の行を削除する方法をご紹介します。

Word VBAとは？
行を削除する基本的なVBAコード
特定の行を削除する方法
すべての表の最終行を削除する方法
実際の操作手順
よくある質問や疑問
今すぐ解決したい！どうしたらいい？
まとめ

Word VBAとは？

Wordのイメージ

まず、Word VBAについて簡単にご説明します。VBAは、Microsoft Office製品に組み込まれているプログラミング言語で、繰り返しの作業や複雑な操作を自動化することができます。例えば、表の行を一括で削除したり、特定の条件に合った行を削除することが可能です。

行を削除する基本的なVBAコード

Word VBAで表の行を削除する基本的なコードは以下の通りです。

Sub 行削除()

    If Selection.Information(wdWithInTable) = True Then

        Selection.Rows.Delete

    End If

End Sub

このコードは、カーソルが表内にある場合に、その行を削除します。簡単な操作で、不要な行を削除することができます。

特定の行を削除する方法

次に、特定の行を削除する方法をご紹介します。例えば、カーソルがある行から下の行をすべて削除したい場合、以下のコードを使用します。

Sub 行削除()

    Dim i As Integer

    For i = 1 To 100

        If Selection.Information(wdWithInTable) = True Then

            Selection.Rows.Delete

        Else

            Exit For

        End If

    Next i

End Sub

このコードでは、カーソルがある行から下の行を最大100行まで削除します。必要に応じて、削除する行数を変更できます。

すべての表の最終行を削除する方法

文書内に複数の表があり、それぞれの最終行を削除したい場合、以下のコードを使用します。

Sub 最終行削除()

    Dim tbl As Table

    For Each tbl In ActiveDocument.Tables

        tbl.Rows.Last.Delete

    Next

End Sub

このコードは、文書内のすべての表の最終行を削除します。複数の表を扱う際に便利です。

実際の操作手順

VBAコードを実際にWordで使用する手順は以下の通りです。

Wordを開き、「Alt + F11」を押してVisual Basic for Applications（VBA）エディタを開きます。
「挿入」メニューから「標準モジュール」を選択します。
表示されたモジュールに、上記のVBAコードをコピー＆ペーストします。
「F5」キーを押してコードを実行します。

これで、指定した操作が実行されます。

よくある質問や疑問

Q1: VBAコードを実行する際にエラーが出る場合、どうすれば良いですか？

エラーが出る場合、コードに誤りがある可能性があります。エラーメッセージを確認し、該当部分を修正してください。また、カーソルが表内にあるかどうかも確認してください。

Q2: VBAを使わずに手動で行を削除する方法はありますか？

はい、手動で行を削除することも可能です。表内で削除したい行を右クリックし、「行の削除」を選択することで削除できます。

Q3: VBAコードを実行する際に、特定の条件を追加することはできますか？

はい、VBAでは条件を追加することができます。例えば、特定の文字列が含まれる行だけを削除するような条件を追加することが可能です。

今すぐ解決したい！どうしたらいい？

いま、あなたを悩ませているITの問題を解決します！
「エラーメッセージ、フリーズ、接続不良…もうイライラしない！」

あなたはこんな経験はありませんか？

✅ ExcelやWordの使い方がわからない💦
✅ 仕事の締め切り直前にパソコンがフリーズ💦
✅ 家族との大切な写真が突然見られなくなった💦
✅ オンライン会議に参加できずに焦った💦
✅ スマホの重くて重要な連絡ができなかった💦

平均的な人は、こうしたパソコンやスマホ関連の問題で年間73時間（約9日分の働く時間！）を無駄にしています。あなたの大切な時間が今この悩んでいる瞬間も失われています。

LINEでメッセージを送れば即時解決！

すでに多くの方が私の公式LINEからお悩みを解決しています。

最新のAIを使った自動応答機能を活用していますので、24時間いつでも即返信いたします。

誰でも無料で使えますので、安心して使えます。

問題は先のばしにするほど深刻化します。

小さなエラーがデータ消失や重大なシステム障害につながることも。解決できずに大切な機会を逃すリスクは、あなたが思う以上に高いのです。

あなたが今困っていて、すぐにでも解決したいのであれば下のボタンをクリックして、LINEからあなたのお困りごとを送って下さい。

相談しに行く

ぜひ、あなたの悩みを私に解決させてください。

まとめ

今回は、Word VBAを使って表の行を削除する方法をご紹介しました。VBAを使うことで、手作業では時間がかかる作業も効率的に行うことができます。初心者の方でも、少しずつコードを覚えていけば、さまざまな自動化が可能になります。ぜひ、今回の内容を参考に、VBAを活用してみてください。

他にも疑問やお悩み事があればお気軽にLINEからお声掛けください。