Compartilhar via


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.