Método Application.InchesToPoints (Word)
Convierte una medida de pulgadas a puntos (1 pulgada = 72 puntos). Devuelve la medida convertida como un valor único.
Sintaxis
expresión. InchesToPoints( _Inches_ )
expresión Variable que representa un objeto Application. Opcional.
Parámetros
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Inches | Obligatorio | Single | Valor en pulgadas que va a convertirse a puntos. |
Ejemplo:
En este ejemplo, se establece el espaciado anterior a los párrafos seleccionados en 0,25 pulgadas.
Selection.ParagraphFormat.SpaceBefore = InchesToPoints(0.25)
En este ejemplo, se imprimen todos los documentos abiertos después de establecer el valor de los márgenes derecho e izquierdo en 0,65 pulgadas.
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
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.