Uniform Property
Applies To
Table object.
Description
True if all the rows in a table have the same number of columns. Read-only Boolean.
See Also
Columns property, Count property.
Example
This example creates a table that contains a split cell and then displays a message box that confirms that the table doesn't have the same number of columns for each row.
Set newDoc = Documents.Add
Set myTable = newDoc.Tables.Add(Selection.Range, 5, 5)
myTable.Cell(3, 3).Split
If myTable.Uniform = False Then MsgBox "Table is not uniform"
This example determines whether the table that contains the selection has the same number of columns for each row.
If Selection.Information(wdWithInTable) = True Then
MsgBox Selection.Tables(1).Uniform
End If