Método Global.InchesToPoints (Word)
Converte uma medida de polegadas em pontos (1 polegada = 72 pontos). Retorna a medida convertida como um único.
Sintaxe
expression. InchesToPoints
( _Inches_
)
Expressão Uma variável que representa um objeto 'Global'. Opcional.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Inches | Obrigatório | Single | O valor em polegadas a ser convertido em pontos. |
Valor de retorno
Único
Exemplo
Este exemplo define como 0,25 polegada (0,625 centímetro) o espaço antes dos parágrafos selecionados.
Selection.ParagraphFormat.SpaceBefore = InchesToPoints(0.25)
Este exemplo imprime cada documento aberto após definir como 0,65 polegada (1,625 centímetro) as margens esquerda e direita.
Dim docLoop As Document
For Each docLoop in Documents
With docLoop
.PageSetup.LeftMargin = InchesToPoints(0.65)
.PageSetup.RightMargin = InchesToPoints(0.65)
.PrintOut
End With
Next docLoop
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.