Red de conocimiento informático - Aprendizaje de código fuente - Al imprimir tablas de Excel, cada vez que imprimo una, necesito realizar un incremento automático de números. ¿Puede algún experto ayudarme a crear una macro?

Al imprimir tablas de Excel, cada vez que imprimo una, necesito realizar un incremento automático de números. ¿Puede algún experto ayudarme a crear una macro?

Estimado, esto requiere programación VBA.

Abra el archivo 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 tabla actual que se está imprimiendo es "Hoja1", se agregará 1 al número en la celda A1 y luego se imprimirá. ¿Privado?Sub?Workbook_BeforePrint(Cancel?As?Boolean)

If?ActiveSheet.Name?=?" Sheet1"?Then

Rango("A1")?Name?=? ActiveSheet.Name?=?Sheet1" Entonces

Rango("A1")?+?1

Fin?Si

Fin?Sub

上篇: Tutorial de transformación de Stardelou 下篇: ¿Cuál es la diferencia entre todas las herramientas que vienen con el nuevo Ranger?

Al imprimir tablas de Excel, cada vez que imprimo una, necesito realizar un incremento automático de números. ¿Puede algún experto ayudarme a crear una macro?

Artículos populares