PowerPointでVBAを使ってテーブルの枠線をカスタマイズする方法

2025.10.06

PowerPointでプレゼンテーションを作成していると、テーブルの枠線を調整したくなることがありますよね。特に、VBA（Visual Basic for Applications）を使うと、手作業では難しい細かい調整や自動化が可能になります。今回は、初心者の方にもわかりやすく、VBAを使ってPowerPointのテーブルの枠線をカスタマイズする方法をご紹介します。

VBAでテーブルの枠線を操作する基本
1. 枠線の設定方法
2. 枠線のスタイルや太さの変更
よくある質問とその回答
今すぐ解決したい！どうしたらいい？
まとめ

VBAでテーブルの枠線を操作する基本

PowerPointのイメージ

PowerPointのテーブルでは、各セルに対して枠線を設定できます。VBAを使うと、これらの枠線の色や太さ、スタイルを自由に変更できます。

枠線の設定方法

以下のVBAコードは、特定のセルの上部の枠線を設定する例です。

vba

ActiveWindow.Selection.ShapeRange.Table.Cell(1, 1).Borders(ppBorderTop).ForeColor.RGB = RGB(255, 0, 0)

このコードでは、1枚目のスライドのテーブルの1行1列目のセルの上部の枠線の色を赤に設定しています。`ppBorderTop`は上部の枠線を指し、`ForeColor.RGB = RGB(255, 0, 0)`で色を赤に指定しています。

枠線のスタイルや太さの変更

枠線のスタイルや太さもVBAで変更できます。例えば、以下のコードで枠線のスタイルを実線に、太さを2ポイントに設定できます。

vba

With ActiveWindow.Selection.ShapeRange.Table.Cell(1, 1).Borders(ppBorderTop)

    .LineStyle = msoLineSolid

    .Weight = 2

End With

`LineStyle`で枠線のスタイルを、`Weight`で太さを指定しています。

よくある質問とその回答

Q1: VBAでテーブルの全てのセルに枠線を一括で設定する方法はありますか？

はい、可能です。以下のコードで、テーブル内の全てのセルの上部の枠線を赤に設定できます。

vba

Dim tbl As Table

Set tbl = ActiveWindow.Selection.ShapeRange.Table

For i = 1 To tbl.Rows.Count

    For j = 1 To tbl.Columns.Count

        tbl.Cell(i, j).Borders(ppBorderTop).ForeColor.RGB = RGB(255, 0, 0)

    Next j

Next i

このコードでは、テーブル内の全てのセルに対して枠線の色を赤に設定しています。

Q2: VBAで特定のセルの枠線を非表示にする方法はありますか？

はい、可能です。以下のコードで、特定のセルの上部の枠線を非表示にできます。

vba

ActiveWindow.Selection.ShapeRange.Table.Cell(1, 1).Borders(ppBorderTop).Visible = msoFalse

`Visible = msoFalse`で枠線を非表示にしています。

Q3: VBAでテーブルの枠線の色を変更する際、色の指定方法はどうすればよいですか？

色の指定には、RGB関数を使用します。例えば、以下のコードで枠線の色を青に設定できます。

vba

ActiveWindow.Selection.ShapeRange.Table.Cell(1, 1).Borders(ppBorderTop).ForeColor.RGB = RGB(0, 0, 255)

`RGB(0, 0, 255)`で青色を指定しています。

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

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

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

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

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

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

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

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

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

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

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

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

相談しに行く

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

まとめ

VBAを使うことで、PowerPointのテーブルの枠線を細かくカスタマイズすることができます。手作業では難しい細かい調整や、大量のスライドに対する一括処理もVBAなら簡単に実現できます。ぜひ、今回ご紹介したコードを参考に、プレゼンテーションのデザインをより魅力的に仕上げてみてください。

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