¿Cómo utilizar VBA para registrar automáticamente el número de empleado ganador, por ejemplo?
Paso 1: abra Excel y abra el libro.
Abre la aplicación Excel.
Abra el libro que contiene los datos que desea registrar automáticamente.
Paso 2: Insertar código VBA
¿Novedades? ¿Alt + F11? La clave que abre el editor VBA.
En el editor de VBA, seleccione su libro de trabajo.
En el libro de trabajo, haga clic derecho en la hoja de trabajo donde desea colocar el código y seleccione Insertar -> "Módulo"
En la ventana de código del nuevo módulo, pegue lo siguiente código:
Copiar código de Vba
Subregistro LuckyNumbers()
Definir variables
Dim rng como rango
Atenuar celdas como rango
Atenuar número de la suerte como cadena
Atenuar última fila mientras
Establezca el área a verificar, como la columna a.
Establecer RNG = este libro de trabajo. Hoja de trabajo ("Hoja1"). Rango ("a1: a100")'Modifica el rango según la situación real.
Comprueba cada celda del rango.
Para cada celda en rng
Si el valor de la celda es el número de empleado actualizado (como "20230101"), regístrelo.
Si células. Valor = "Actualizar el número de orden de trabajo" y luego modificar el valor o condición coincidente de acuerdo con la situación real.
NúmeroAfortunado = celda. Valor
Salir para...
Terminará si...
Siguiente celda
Encuentra el final de la fila que será logged Una fila (por ejemplo, columna B)
lastRow = ThisWorkbook. Hoja de trabajo ("Hoja1"). celda (fila. recuento, "B"). final (xlArriba). Fila + 1
Escriba el número de trabajo registrado en la siguiente fila de la columna b.
Este libro de trabajo. Hoja de trabajo ("Hoja1"). Celda (última fila, "B"). Valor = número de suerte
Conector final
Guarde y cierre el editor VBA.
Paso 3: Pruebe la macro
En Excel, haga clic en la pestaña Desarrollador (si no aparece, presione las teclas Alt + F11 para abrir el Editor VBA y seleccione Ver - >"pestaña"->"Herramientas de desarrollo").
En la pestaña Desarrollador, haga clic en el botón Macro.
En la lista de macros emergente, seleccione la macro que acaba de crear (como "RecordLuckyNumbers") y luego haga clic en "Ejecutar".
En este momento, si hay un valor coincidente en la columna A, debe registrarse en la siguiente fila de la columna B.
Notas:
Ajuste los rangos de celdas y los valores coincidentes en el código según sus necesidades específicas.
Si la macro no se ejecuta como se esperaba, asegúrese de que la configuración de seguridad de Excel permita que se ejecute. Puede encontrarlo en Archivo -> Opciones -> Centro de confianza -> Configuración del Centro de confianza -> Verificar y ajustar en Configuración de macros.