VBAでPowerPointのテーブルに枠線を追加・変更する方法【初心者向けガイド】

2025.10.082026.01.27

PowerPointのプレゼンテーションで、テーブルに枠線を追加したり、色や太さを変更したりしたいと考えていませんか？特に、VBA（Visual Basic for Applications）を使って自動化したい場合、どこから手を付ければ良いのか分からない方も多いでしょう。この記事では、初心者の方にも分かりやすく、VBAを使ってPowerPointのテーブルに枠線を設定する方法をご紹介します。

VBAでPowerPointのテーブルに枠線を設定する基本の流れ
枠線の色や太さを変更する方法
よくある質問や疑問
まとめ

VBAでPowerPointのテーブルに枠線を設定する基本の流れ

PowerPointのイメージ

まずは、VBAを使ってPowerPointのテーブルに枠線を設定する基本的な流れを見ていきましょう。

PowerPointのプレゼンテーションを開くVBAを実行する前に、対象となるプレゼンテーションを開いておきます。
テーブルを選択する枠線を設定したいテーブルを選択します。
VBAエディタを開くAlt + F11キーを押して、VBAエディタを開きます。
コードを入力する以下のコードをVBAエディタに入力します。

vba

Sub SetTableBorders()

    Dim slide As slide

    Dim shape As shape

    Dim cell As cell

    Dim table As table

    Dim i As Integer

    Dim j As Integer
    ' スライドとテーブルの設定

    Set slide = ActivePresentation.Slides(1)

    Set shape = slide.Shapes(1)

    Set table = shape.Table

' テーブルの各セルに枠線を設定 For i = 1 To table.Rows.Count For j = 1 To table.Columns.Count Set cell = table.Cell(i, j) ' 上部の枠線を設定 cell.Borders(ppBorderTop).Weight = 1 cell.Borders(ppBorderTop).ForeColor.RGB = RGB(0, 0, 0) ' 黒色 ' 下部の枠線を設定 cell.Borders(ppBorderBottom).Weight = 1 cell.Borders(ppBorderBottom).ForeColor.RGB = RGB(0, 0, 0) ' 黒色 ' 左部の枠線を設定 cell.Borders(ppBorderLeft).Weight = 1 cell.Borders(ppBorderLeft).ForeColor.RGB = RGB(0, 0, 0) ' 黒色 ' 右部の枠線を設定 cell.Borders(ppBorderRight).Weight = 1 cell.Borders(ppBorderRight).ForeColor.RGB = RGB(0, 0, 0) ' 黒色 Next j Next i End Sub

このコードは、指定したスライドのテーブルの各セルに対して、上部、下部、左部、右部の枠線を黒色で1ポイントの太さで設定するものです。

このサイトをチップで応援

￥100ありがとう￥300助かった！￥1,500神記事！

枠線の色や太さを変更する方法

VBAを使って、枠線の色や太さを変更することも可能です。上記のコード内で、以下の部分を変更することで、色や太さを調整できます。

vba

' 枠線の太さを変更

cell.Borders(ppBorderTop).Weight = 2 ' 2ポイントの太さ

' 枠線の色を変更

cell.Borders(ppBorderTop).ForeColor.RGB = RGB(255, 0, 0) ' 赤色

これにより、枠線の太さや色を自由にカスタマイズできます。

よくある質問や疑問

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

VBAのコードは、PowerPointのVBAエディタに入力します。VBAエディタは、PowerPointを開いた状態でAlt + F11キーを押すことで開くことができます。エディタ内で「挿入」→「標準モジュール」を選択し、表示されたウィンドウにコードを貼り付けてください。

Q2: VBAを使わずにテーブルの枠線を変更する方法はありますか？

はい、PowerPointの「テーブルデザイン」タブを使用して、テーブルの枠線を手動で変更することができます。テーブルを選択し、「テーブルデザイン」タブの「枠線」グループから、色、太さ、スタイルを選択して適用できます。

Q3: VBAのコードを実行するとエラーが出ます。どうすれば良いですか？

エラーが出る場合、コード内のスライド番号やシェイプ番号が正しいか確認してください。また、PowerPointのセキュリティ設定でマクロが無効になっている場合がありますので、「ファイル」→「オプション」→「セキュリティセンター」からマクロの設定を確認してください。

まとめ

PowerPointのテーブルに枠線を追加・変更することで、プレゼンテーションの見栄えを大きく向上させることができます。VBAを使うことで、複数のスライドやテーブルに対して一括で枠線を設定することができ、作業効率もアップします。ぜひ、上記の手順を試して、プレゼンテーションをより魅力的なものにしてください。

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