Propriedade Shape.Table (Publisher)

Devolve um objeto Tabela que representa uma tabela no Microsoft Publisher.

Sintaxe

expressão. Tabela

expressão Uma variável que representa um objeto Shape.

Exemplo

O exemplo a seguir adiciona uma tabela 5x5 na primeira página da publicação ativa e, em seguida, seleciona a primeira coluna da nova tabela.

Sub NewTable() 
 With ActiveDocument.Pages(1).Shapes.AddTable(NumRows:=5, _ 
 NumColumns:=5, Left:=72, Top:=300, Width:=400, Height:=100) 
 .Table.Columns(3).Cells(3).Fill.ForeColor.RGB = RGB _ 
 (Red:=255, Green:=0, Blue:=0) 
 End With 
End Sub

O exemplo a seguir seleciona a tabela especificada na publicação ativa. Este exemplo pressupõe que existe pelo menos uma forma na primeira página da publicação ativa.

Sub SelectTable() 
 With ActiveDocument.Pages(1).Shapes(1) 
 If .Type = pbTable Then 
 .Table.Rows(3).Cells(3).Fill.ForeColor _ 
 .RGB = RGB(Red:=150, Green:=150, Blue:=150) 
 End If 
 End With 
End Sub

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.