Share via


ShapeRange.HasTable Property

Publisher Developer Reference

Returns msoTrue if the shape represents a TableFrame object or msoFalse if the shape represents any other object type. Read-only.

Syntax

expression.HasTable

expression   A variable that represents a ShapeRange object.

Example

This example checks the currently selected shape to see if it is a table. If it is, the code sets the width of column one to one inch (72 points).

Visual Basic for Applications
  Sub IsTable()
With Application.Selection.ShapeRange
    If .<strong>HasTable</strong> = msoTrue Then
        .Table.Columns(1).Width = 72
    End If
End With

End Sub

See Also