Column Property

Microsoft Word Visual Basic

Show Column property as it applies to the Bookmark object.

True if the specified bookmark is a table column. Read-only Boolean.

expression.Column

expression    Required. An expression that returns one of the objects in the Applies TO list.

Show Column property as it applies to the Cell object.

Returns a read-only Column object that represents the table column containing the specified cell.

expression.Column

expression    Required. An expression that returns one of the objects in the Applies To list.

Example

ShowAs it applies to the Bookmark object.

This example creates a table with a bookmark and then displays a message box that confirms that the bookmark is a table column.

Dim docNew As Document
Dim tableNew As Table
Dim rangeCell As Range

Set docNew = Documents.Add
Set tableNew = docNew.Tables.Add(Selection.Range, 3, 5)
Set rangeCell = tableNew.Cell(3,5).Range

rangeCell.InsertAfter "Cell(3,5)" 
docNew.Bookmarks.Add Name:="BKMK_Cell35", Range:=rangeCell
MsgBox docNew.Bookmarks(1).Column
				

ShowAs it applies to the Cell object.

This example creates a 3x5 table and applies shading to the even-numbered columns.

Dim tableNew As Table
Dim cellLoop As Cell

Selection.Collapse Direction:=wdCollapseStart
Set tableNew = _
    ActiveDocument.Tables.Add(Range:=Selection.Range, _
    NumRows:=3, NumColumns:=5)

For Each cellLoop In tableNew.Rows(1).Cells
    If cellLoop.ColumnIndex Mod 2 = 0 Then 
        cellLoop.Column.Shading.Texture = wdTexture10Percent
    End If
Next cellLoop