¿Cómo generar boletos de admisión por lotes en una hoja de trabajo en Excel?

Supuesto: La primera tabla contiene toda la información y la segunda tabla es la plantilla del formulario del boleto de admisión.

1. Presione Alt+F11 para abrir el editor VBA;

2. Haga clic en el menú Insertar

3. :

Sub SCZKZ()

Definir variable I.

Dim i

Lazo For, información del personal del 1 al 10.

Para i =1 a 10

Mueva y copie la plantilla del segundo formulario de boleto de admisión al nuevo formulario

Hoja (2). Copiado en:=sheets (sheets. count)

La celda B1 en la nueva tabla es igual al valor de la celda en la segunda columna de la primera tabla, y las demás se escriben según las posiciones reales .

Hojas (hojas. Contar). rango(" b 1 ")=hoja(1).

Celda(I,2)

Luego

Finalizar adaptador