Método Application.InchesToPoints (Word)

Artigo
04/07/2023

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 Application. 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.

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

Objeto de Aplicativo

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.

Compartilhar via