Resumen
Microsoft Visual Basic para Aplicaciones no proporciona un método para determinar el número total de páginas que se imprimirán en una hoja de cálculo. Sin embargo, puede usar el ExecuteExcel4Macro método para usar el GET. Función de hoja de macros DOCUMENT(50) para devolver el número total de páginas que se imprimirán en la hoja de cálculo activa.
Más información
Microsoft proporciona ejemplos de programación únicamente con fines ilustrativos, sin garantía expresa ni implícita, incluidas, entre otras, las garantías implícitas de comerciabilidad o idoneidad para un fin determinado. En este artículo se supone que está familiarizado con el lenguaje de programación que se muestra y las herramientas usadas para crear y depurar procedimientos. Los profesionales de soporte técnico de Microsoft pueden ayudar a explicar la funcionalidad de un procedimiento determinado, pero no modificarán estos ejemplos para proporcionar funcionalidad adicional ni construir procedimientos para satisfacer sus necesidades específicas.
Si tiene una experiencia de programación limitada, es posible que desee ponerse en contacto con un partner certificado de Microsoft o con los servicios de asesoramiento de Microsoft. Para obtener más información, visite estos sitios web de Microsoft:
Partners certificados de Microsoft: https://partner.microsoft.com/global/30000104
Servicios profesionales de Microsoft: https://www.microsoft.com/professionalservices/overview
Para obtener más información sobre las opciones de soporte técnico disponibles y cómo ponerse en contacto con Microsoft, visite el siguiente sitio web de Microsoft:http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMSPara usar la macro siguiente, configure un archivo de Microsoft Excel de la siguiente manera:
-
Cree un nuevo libro de Microsoft Excel.
-
Seleccione el rango A1:J100.
-
Escriba el número 1 y presione CTRL+ENTRAR. Debería ver todas las celdas seleccionadas rellenadas con el número 1.
-
Insertar un módulo de macro de Visual Basic.
-
Escriba el código siguiente en el módulo:
-
Sub ShowMe() MsgBox ExecuteExcel4Macro("GET.DOCUMENT(50)") & _ " pages will be printed." End Sub
-
Ejecutar la macro.
Referencias
Puede encontrar información adicional sobre la función de macro Get.Document en el manual de referencia de funciones de Excel.