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

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の「ホーム」タブから「段落」グループにある整列ボタン（左揃え、中央揃え、右揃え）をクリックすることで、テキストの整列ができます。

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

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

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

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

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

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

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

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

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

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

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

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

相談しに行く

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

まとめ

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

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