テーブルの列または行のセルを表す CellRange コレクションを取得します。 読み取り専用です。
構文
式.セル
式Column オブジェクトを表す変数。
戻り値
CellRange
例
次の使用例は、プレゼンテーションを新しく作成し、スライドを追加します。次に、そのスライドに 3 x 3 の表を挿入し、各セルに列番号と行番号を割り当てます。
Dim i As Integer
Dim j As Integer
With Presentations.Add
.Slides.Add(1, ppLayoutBlank).Shapes.AddTable(3, 3).Select
Set myTable = .Slides(1).Shapes(1).Table
For i = 1 To myTable.Columns.Count
For j = 1 To myTable.Columns(i).Cells.Count
myTable.Columns(i).Cells(j).Shape.TextFrame _
.TextRange.Text = "col. " & i & "row " & j
Next j
Next i
End With
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。