Objeto Rows (Publisher)
Uma coleção de linha objetos que representam as linhas em uma tabela.
Comentários
Use as linhas propriedade da tabela objeto para retornar a coleção de linhas.
Use Linhas (índice), em que o índice é o número do índice, para retornar um único objeto Row . O número de índice representa a posição da linha da coleção Rows (contando da esquerda para direita).
Exemplo
O exemplo a seguir exibe o número de objetos Row da coleção de linhas da primeira tabela do documento ativo.
Sub CountRows()
MsgBox ActiveDocument.Pages(2).Shapes(1).Table.Rows.Count
End Sub
Este exemplo define o preenchimento para todas as linhas com numeração uniforme e limpa o preenchimento de todas as linhas com numeração ímpar na tabela especificada. Este exemplo pressupõe que a forma especificada seja uma tabela e não outro tipo de forma.
Sub FillCellsByRow()
Dim shpTable As Shape
Dim rowTable As Row
Dim celTable As Cell
Set shpTable = ActiveDocument.Pages(2).Shapes(1)
For Each rowTable In shpTable.Table.Rows
For Each celTable In rowTable.Cells
If celTable.Row Mod 2 = 0 Then
celTable.Fill.ForeColor.RGB = RGB _
(Red:=180, Green:=180, Blue:=180)
Else
celTable.Fill.ForeColor.RGB = RGB _
(Red:=255, Green:=255, Blue:=255)
End If
Next celTable
Next rowTable
End Sub
O exemplo a seguir seleciona a terceira linha da tabela especificada.
Sub SelectRows()
ActiveDocument.Pages(2).Shapes(1).Table.Rows(3).Cells.Select
End Sub
Métodos
Propriedades
Confira também
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.