Propriedade Table.Uniform (Word)

True se todas as linhas em uma tabela tiverem o mesmo número de colunas. Boolean somente leitura.

Sintaxe

expression. Uniform

Expressão Uma expressão que retorna um objeto 'Table'.

Exemplo

Este exemplo cria uma tabela contendo uma célula dividida e exibe uma caixa de mensagem confirmando que a tabela não tem o mesmo número de colunas em cada linha.

Set newDoc = Documents.Add 
Set myTable = newDoc.Tables.Add(Selection.Range, 5, 5) 
myTable.Cell(3, 3).Split 1, 2 
If myTable.Uniform = False Then MsgBox "Table is not uniform"

Este exemplo determina se a tabela que contém a seleção tem o mesmo número de colunas em todas as linhas.

If Selection.Information(wdWithInTable) = True Then 
 MsgBox Selection.Tables(1).Uniform 
End If

Confira também

Objeto Table

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.