Método Document.FitToPages (Word)
Reduce el tamaño de la fuente del texto lo justo para que el documento ocupe una página menos.
Sintaxis
expresión. FitToPages
expresión obligatoria. Variable que representa un objeto Document.
Comentarios
Si Word no es capaz de reducir en uno el número de páginas, se produce un error.
Ejemplo:
En este ejemplo se intenta reducir en una página el número de páginas del documento activo.
On Error GoTo errhandler
ActiveDocument.FitToPages
errhandler:
If Err = 5538 Then MsgBox "Fit to pages failed"
En este ejemplo se intenta reducir en una página el numero de páginas de todos los documentos abiertos.
For Each doc In Documents
doc.FitToPages
Next doc
Consulte 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.