¿Cómo contar el número de páginas impresas en una hoja?
Antes de imprimir una hoja, es posible que desee conocer el número total de páginas impresas con antelación. En este artículo, le presentaré algunos trucos para hacerlo.
Contar el número de páginas impresas mediante la función Imprimir
Contar el número de páginas impresas mediante código VBA
Contar el número de páginas impresas mediante Kutools para Excel
Contar el número de páginas impresas mediante la función Imprimir
Para contar el número de páginas impresas antes de imprimir, puede ir a Imprimir para ver el número de páginas.
Active la hoja en la que desea contar las páginas impresas y haga clic en Archivo > Imprimir, luego podrá ver el número de páginas impresas.
Nota: puede cambiar la escala de impresión desde la lista desplegable bajo Opciones.
Contar el número de páginas impresas mediante código VBA
También hay un código VBA que puede indicarle el número de páginas impresas en una hoja.
1. Active la hoja que desea contar, presione las teclas Alt + F11 para abrir la ventana Microsoft Visual Basic para Aplicaciones.
2. Haga clic en Insertar > Módulo, luego pegue el siguiente código en el Módulo.
VBA: Contar el número de páginas impresas en una hoja
Sub ShowMe()
MsgBox ExecuteExcel4Macro("GET.DOCUMENT(50)") & _
" pages will be printed."
End Sub3. Presione la tecla F5 para ejecutar el código, y luego aparecerá un cuadro de diálogo que le indicará el número de páginas impresas. Ver captura de pantalla:
Contar el número de páginas impresas mediante Kutools para Excel
Si tiene Kutools para Excel, puede aplicar su utilidad Imprimir páginas especificadas y luego ver las páginas impresas de la hoja activa.
Después de instalar Kutools para Excel, realice los siguientes pasos:(¡Descarga gratuita de Kutools para Excel ahora! )
Active la hoja cuyas páginas desea contar, haga clic en Kutools Plus > Imprimir > Imprimir páginas especificadas, y luego vea el número de páginas en el cuadro de diálogo emergente. Ver captura de pantalla:
Demostración
Las mejores herramientas de productividad para Office
Mejora tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab incorpora la interfaz de pestañas en Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!
Todos los complementos de Kutools. Un solo instalador
El paquete Kutools for Office agrupa complementos para Excel, Word, Outlook y PowerPoint junto con Office Tab Pro, ideal para equipos que trabajan en varias aplicaciones de Office.
- Suite todo en uno: complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un solo instalador, una licencia: configuración en minutos (compatible con MSI)
- Mejor juntos: productividad optimizada en todas las aplicaciones de Office
- Prueba completa de30 días: sin registro ni tarjeta de crédito
- La mejor relación calidad-precio: ahorra en comparación con la compra individual de complementos