Publisher.ShapeRange.HasTable.md

title	keywords	f1_keywords	api_name	ms.assetid	ms.date	ms.localizationpriority
ShapeRange.HasTable property (Publisher)	vbapb10.chm2293857	vbapb10.chm2293857	Publisher.ShapeRange.HasTable	71ce4980-f5b5-c94c-c29d-32b97cf771fd	06/14/2019	medium

ShapeRange.HasTable property (Publisher)

Returns msoTrue if the shape represents a Table 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).

Sub IsTable() 
 
 With Application.Selection.ShapeRange 
 If .HasTable = msoTrue Then 
 .Table.Columns(1).Width = 72 
 End If 
 End With 
 
End Sub

[!includeSupport and feedback]