次の方法で共有


Columns オブジェクト (Word)

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

注釈

コレクションを取得するのにには、 範囲選択範囲 または テーブル のオブジェクトの Columns プロパティを使用します。 次の例では、作業中の文書の最初のテーブルの コレクションの Column オブジェクトの数を表示します。

MsgBox ActiveDocument.Tables(1).Columns.Count

次の使用例は、3 行 6 列の表を作成し、各列に種類の異なる網かけを設定します。

Set myTable = ActiveDocument.Tables.Add(Range:=Selection.Range, _ 
 NumRows:=3, NumColumns:=6) 
For Each col In myTable.Columns 
 col.Shading.Texture = 2 + i 
 i = i + 1 
Next col

Add メソッドを使用して、表に列を追加します。 次の使用例は、作業中の文書で最初の表に列を追加し、列の幅を等しくします。

If ActiveDocument.Tables.Count >= 1 Then 
 Set myTable = ActiveDocument.Tables(1) 
 myTable.Columns.Add BeforeColumn:=myTable.Columns(1) 
 myTable.Columns.DistributeWidth 
End If

1 つの オブジェクトを取得するのにには、 のインデックス、インデックスにインデックス番号があるを使用します。 インデックス番号は左から右に数えた のコレクション内の列の位置を表します。 次の例では、最初の表の最初の列を選択します。

ActiveDocument.Tables(1).Columns(1).Select

メソッド

名前
Add
AutoFit
Delete
DistributeWidth
アイテム
Select
SetWidth

プロパティ

名前
アプリケーション
Borders
Count
Creator
First
Last
NestingLevel
Parent
PreferredWidth
PreferredWidthType
Shading
Width

関連項目

Word オブジェクト モデル リファレンス

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

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