【VBAリファレンス｜実務向け】[実務の効率化] Wordの「表の解除」機能を使いこなし、データ整理を爆速にする方法

ExcelVBA

2026.10.15

1. 導入：なぜこの技術が重要なのか

実務でWordを使っていると、「既存の表の中にあるテキストデータだけを抜き出して、別の資料に再利用したい」という場面に遭遇することがあります。しかし、手作業でコピー＆ペーストを繰り返すと、レイアウトが崩れたり、誤って不要な行まで拾ってしまったりと、非常に手間がかかります。
今回ご紹介する「表の解除」機能を使えば、表の構造（罫線）だけを一瞬で削除し、文字列だけを標準のテキストとして抽出することが可能です。この技術は、帳票データをデータベースやExcelへ移行する際の前処理として非常に役立ちます。

2. 基礎知識：表の解除とは

Wordにおける「表の解除」とは、表という枠組みを破棄し、中身の文字列を「段落」や「タブ」で区切られた通常のテキストに変換する機能です。
この操作を行うと、罫線は完全に消滅しますが、それぞれのセルに入力されていたデータは、指定した区切り文字（タブ、カンマ、段落記号など）で分けられた状態で残ります。これにより、表形式のデータを、扱いやすいCSV形式やリスト形式に即座に変換できます。

3. 実装/解決策：具体的な手順

Word 2007以降のバージョンでは、以下の手順で実行します。

1. 解除したい表の中にカーソルを置きます（表全体を対象にする場合は、表の中にカーソルがあるだけでOKです）。
2. リボンの［レイアウト］タブ（「テーブルツール」配下）を選択します。
3. ［表の解除］ボタンをクリックします。
4. 表示されたダイアログボックスで、文字列の区切り文字（タブ、カンマ、その他）を選択し、［OK］を押します。

これだけで、罫線が消え、データがテキストとして展開されます。

4. サンプルプログラム：VBAで自動化する

もし、大量のWord文書に対してこの操作を一括で行いたい場合は、VBAを活用するのが効率的です。以下に、アクティブな文書内のすべての表を解除し、タブ区切りに変換するコードを紹介します。

Sub ConvertAllTablesToText() ' 文書内のすべての表を文字列に変換するマクロ Dim tbl As Table


    ' 文書内の表を後ろから順番に処理（解除するとインデックスがずれるため）

    For Each tbl In ActiveDocument.Tables

        ' wdSeparateByTabsはタブ区切りを指定しています

        tbl.ConvertToText Separator:=wdSeparateByTabs

    Next tbl

MsgBox "すべての表を解除し、テキストに変換しました。" End Sub

5. 応用・注意点：現場での活用ポイント

・区切り文字の選択に注意：
「文字列の区切り」で何を選ぶかは重要です。Excelに貼り付ける予定であれば「タブ」か「カンマ」を選択するのが定石です。これを選んでおくと、テキストをコピーしてExcelに貼り付けた際、自動的にセル分割されます。

・部分的な解除も可能：
表全体ではなく、特定の行だけを解除したい場合は、解除したい行をマウスでドラッグして範囲選択した状態で、上記の手順を行ってください。

・元に戻す（Undo）：
もし誤って解除してしまった場合は、すぐに「Ctrl + Z」キーを押せば表の状態に戻ります。作業前には必ず保存しておくことをおすすめします。

この機能を使いこなせば、資料作成のスピードが格段に向上します。ぜひ日々の事務作業に取り入れてみてください。