初心者でもわかる！Word VBAでテーブルのセル内テキストを整列させる方法

2025.06.032026.01.27

Wordで作成したテーブルのセル内のテキストを整列させる作業は、見た目を整えるだけでなく、文書全体の可読性を向上させるために非常に重要です。特に、VBA（Visual Basic for Applications）を使って自動化することで、効率的に作業を進めることができます。今回は、初心者の方にもわかりやすく、Word VBAを使ってテーブルのセル内のテキストを整列させる方法をご紹介します。

VBAでテーブルのセル内テキストを整列させる基本の方法
複数のセルや列に対して整列を適用する方法
1. 複数のセルに対して整列を適用する
2. 特定の列に対して整列を適用する
よくある質問や疑問
まとめ

VBAでテーブルのセル内テキストを整列させる基本の方法

Wordのイメージ

まずは、VBAを使ってテーブルのセル内のテキストを整列させる基本的な方法から始めましょう。

セル内のテキストを中央揃えにする

セル内のテキストを中央に配置するには、以下のようなVBAコードを使用します。

vba

Sub AlignTextCenter()

    With ActiveDocument.Tables(1).Cell(1, 1).Range

        .ParagraphFormat.Alignment = wdAlignParagraphCenter

    End With

End Sub

このコードでは、アクティブな文書の最初のテーブルの1行1列目のセル内のテキストを中央揃えにしています。

セル内のテキストを左揃えにする

テキストを左揃えにする場合は、以下のようにコードを変更します。

vba

Sub AlignTextLeft()

    With ActiveDocument.Tables(1).Cell(1, 1).Range

        .ParagraphFormat.Alignment = wdAlignParagraphLeft

    End With

End Sub

これで、指定したセル内のテキストが左揃えになります。

セル内のテキストを右揃えにする

右揃えにするには、次のようなコードを使用します。

vba

Sub AlignTextRight()

    With ActiveDocument.Tables(1).Cell(1, 1).Range

        .ParagraphFormat.Alignment = wdAlignParagraphRight

    End With

End Sub

これで、指定したセル内のテキストが右揃えになります。

複数のセルや列に対して整列を適用する方法

複数のセルや列に対して同じ整列を適用する場合、以下のようなVBAコードを使用します。

複数のセルに対して整列を適用する

vba

Sub AlignMultipleCells()

    Dim cell As Cell

    For Each cell In ActiveDocument.Tables(1).Range.Cells

        cell.Range.ParagraphFormat.Alignment = wdAlignParagraphCenter

    Next cell

End Sub

このコードでは、最初のテーブルのすべてのセルに対して中央揃えを適用しています。

特定の列に対して整列を適用する

vba

Sub AlignColumn()

    Dim i As Integer

    For i = 1 To ActiveDocument.Tables(1).Rows.Count

        ActiveDocument.Tables(1).Cell(i, 2).Range.ParagraphFormat.Alignment = wdAlignParagraphRight

    Next i

End Sub

このコードでは、最初のテーブルの2列目のすべてのセルに対して右揃えを適用しています。

よくある質問や疑問

Q1: VBAコードをどこに入力すればよいですか？

VBAコードは、Wordの「開発」タブから「Visual Basic」を選択し、VBAエディタを開いて入力します。新しいモジュールを挿入し、その中にコードを貼り付けて実行します。

Q2: セル内のテキストだけでなく、セル自体の配置も変更できますか？

はい、セル自体の配置も変更可能です。例えば、テーブル全体を中央揃えにするには、以下のコードを使用します。

vba

Sub AlignTableCenter()

    ActiveDocument.Tables(1).Rows.Alignment = wdAlignRowCenter

End Sub

これで、テーブル全体が中央揃えになります。

Q3: VBAを使わずに手動でセル内のテキストを整列させる方法はありますか？

はい、手動でも可能です。セル内のテキストを選択し、Wordの「ホーム」タブから「段落」グループにある整列ボタン（左揃え、中央揃え、右揃え）をクリックすることで、テキストの整列ができます。

まとめ

Word VBAを使ってテーブルのセル内のテキストを整列させる方法をご紹介しました。これらの基本的な操作を覚えることで、文書の見た目を整え、よりプロフェッショナルな印象を与えることができます。VBAを活用することで、作業の効率化も図れますので、ぜひ試してみてください。

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