Método Rows.SetLeftIndent (Word)
Define o recuo para uma ou mais linhas em uma tabela.
Sintaxe
expression. SetLeftIndent( _LeftIndent_ , _RulerStyle_ )
expressão Obrigatório. Uma variável que representa um objeto Rows .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| LeftIndent | Obrigatório | Single | A distância (em pontos) entre a margem esquerda atual da linha ou das linhas especificadas e a margem esquerda desejada. |
| RulerStyle | Obrigatório | WdRulerStyle | Controla como o Microsoft Word ajusta a tabela quando o recuo à esquerda é alterado. O comportamento de WdRulerStyle se aplica a tabelas alinhado à esquerda. O comportamento de WdRulerStyle para tabelas centralizado e direita pode ser inesperado; Nesses casos, use o método SetLeftIndent com cuidado. |
Exemplo
Este exemplo cria uma tabela em um novo documento e recua todas as linhas na tabela em 0,5 polegada (1,27 centímetro - 36 pontos). Quando você alterar o recuo esquerdo, as larguras de célula são ajustadas para preservar a borda direita da tabela.
Dim docNew As Document
Dim tableNew As Table
Set docNew = Documents.Add
Set tableNew = docNew.Tables.Add(Range:=Selection.Range, _
NumRows:=3, NumColumns:=3)
tableNew.Rows.SetLeftIndent LeftIndent:=InchesToPoints(0.5), _
RulerStyle:=wdAdjustSameWidth
Este exemplo recua a primeira linha da tabela um no documento ativo em 18 pontos e diminui a largura da primeira coluna para preservar a posição da borda direita da tabela.
If ActiveDocument.Tables.Count >= 1 Then
ActiveDocument.Tables(1).Rows.SetLeftIndent LeftIndent:=18, _
RulerStyle:=wdAdjustFirstColumn
End If
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.