次の方法で共有


Columns オブジェクト (PowerPoint)

のコレクション テーブル内の列を表すオブジェクト。

Columns コレクションを取得するには、Columns プロパティを使用します。 次の使用例は、作業中のプレゼンテーションの先頭の表を検索し、Column コレクションに含まれる Columns オブジェクトの数をカウントし、結果情報を表示します。

Dim ColCount, sl, sh As Integer

With ActivePresentation
    For sl = 1 To .Slides.Count
        For sh = 1 To .Slides(sl).Shapes.Count
            If .Slides(sl).Shapes(sh).HasTable Then
                ColCount = .Slides(sl).Shapes(sh) _
                    .Table.Columns.Count
                MsgBox "Shape " & sh & " on slide " & sl & _
                    " contains the first table and has " & _
                    ColCount & " columns."
                Exit Sub
            End If
        Next
    Next
End With

テーブルに列を追加するのにには、 Addメソッドを使用します。 この例では、既存のテーブルに列を作成し、新しい列の幅を 72 ポイント (2.54 センチ) に設定します。

With ActivePresentation.Slides(2).Shapes(5).Table

    .Columns.Add.Width = 72

End With

単一の Column オブジェクトを取得するには、 Columns (index) を使用します。 Index は Columns コレクション内の列の位置を表します (通常は左から右に数えますが、 TableDirectionプロパティはこれを逆にすることができます)。 次の使用例は、スライド 2 の図形 5 で表の先頭列を選択します。

ActivePresentation.Slides(2).Shapes(5).Table.Columns(1).Select

関連項目

PowerPoint Object Model Reference

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。