Propriedade Story.Table (Publisher)
Retorna um objeto Table que representa uma tabela no Microsoft Publisher.
Sintaxe
expressão. Tabela
Expressão Uma variável que representa um objeto Story .
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.