Programación incremental digital
Estimado, esto requiere programación VBA.
Abra su archivo de Excel, presione "Alt F11" para abrir la ventana de edición de VBA, luego haga doble clic en ThisWorkbook a la izquierda y pegue el siguiente código en el espacio en blanco a la derecha. Cierre la ventana de VBA.
Cada vez que imprima, si el nombre de la hoja actual que se está imprimiendo es "Hoja1", agregará 1 al número de la celda A1 antes de imprimir.
¿Privado? ¿Sub? Workbook_BeforePrint(Cancelar?como?Booleano)
¿Si? Hoja Activa. ¿nombre? =?" Hoja1 "? Entonces
¿Rango("A1 ")? =?Rango("A1 ")? ?1
¿Fin? Si
¿Finalizar? Submarino