Propriedade Borders.DistanceFromRight (Word)
Retorna ou define o espaço (em pontos) entre a borda direita do texto e a borda direita. Long de leitura/gravação.
Sintaxe
expression. DistanceFromRight
Expressão Uma variável que representa um objeto 'Borders'.
Comentários
Usar esta propriedade com uma borda de página, você pode definir o espaço entre o texto e a borda direita ou o espaço entre a borda direita da página e a borda direita. Onde a distância é medida da depende do valor da propriedade DistanceFrom.
Exemplo
Este exemplo adiciona uma borda ao redor de cada parágrafo da seleção e define a distância entre o texto e a borda direita como 3 pontos.
With Selection.Paragraphs.Borders
.Enable = True
.DistanceFromRight = 3
End With
Este exemplo adiciona uma única borda ao redor de cada página da seção um do documento ativo. O exemplo também define como 22 pontos a distância entre a borda direita e esquerda e as bordas correspondentes da página.
Dim borderLoop As Border
With ActiveDocument.Sections(1)
For Each borderLoop In .Borders
borderLoop.LineStyle = wdLineStyleSingle
borderLoop.LineWidth = wdLineWidth050pt
Next borderLoop
With .Borders
.DistanceFrom = wdBorderDistanceFromPageEdge
.DistanceFromLeft = 22
.DistanceFromRight = 22
End With
End With
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.