Ejemplos de Excel VBA

Esto es muy importante cuando comencé a trabajar y aprender Macros VBA, estaba confundido por dónde empezar. Ya hemos visto el Editor VBA que tiene todas las definiciones de las opciones y pestañas de la Ventana del Editor VBA. Como principiante, siempre no sabemos la forma de comenzar la cosa hasta que encontremos una. Este artículo es la solución para aquellos que enfrentan dificultades para usar y aprender ejemplos de VBA y crear macros. Todos nos hemos enfrentado al momento en que ciertas cosas en Excel podrían haberse automatizado usando Macro. Pero, alguien que no sepa cómo usar VBA no podrá crear uno. Esta será una guía útil para aquellos que son nuevos en la codificación de macros VBA.

Ejemplos de VBA en Excel para principiantes

A continuación se muestran los ejemplos de VBA en Excel:

Puede descargar esta plantilla de Excel de ejemplos de VBA aquí - Plantilla de Excel de ejemplos de VBA

VBA Ejemplo # 1

Veamos un ejemplo simple del uso de la codificación VBA. Para esto, siga los pasos a continuación:

Paso 1: Abra un módulo VBA donde escribiremos nuestro código desde la pestaña del menú Insertar como se muestra a continuación.

Paso 2: ahora escriba el subprocedimiento de la macro VBA en cualquier nombre.

Código:

 Sub VBA_Examples1 () End Sub 

Paso 3: Defina una variable usando DIM donde almacenaremos números como enteros.

Código:

 Sub VBA_Examples1 () Dim A como Integer End Sub 

Paso 4: Ahora asigne cualquier número a la variable definida anteriormente, como se muestra a continuación.

Código:

 Sub VBA_Examples1 () Dim A como entero A = 100 End Sub 

Paso 5: Ahora usaremos el cuadro de mensaje para imprimir el valor almacenado en la Variable A.

Código:

 Sub VBA_Examples1 () Dim A como entero A = 100 MsgBox A End Sub 

Paso 6: Ejecute el código presionando la tecla F8 o haciendo clic en el botón Reproducir ubicado debajo de la barra de menú. Veremos el cuadro de mensaje con el valor 100.

Código:

 Sub VBA_Examples1 () Dim A como entero A = 100 MsgBox A End Sub 

Paso 7: Esto también podría haberse hecho usando la función de Impresión de depuración, cuyos valores se ven en la Ventana Inmediata. ( Nota: presione Ctrl + G para abrir la ventana inmediata)

Código:

 Sub VBA_Examples1 () Dim A como entero A = 100 Debug.Print A End Sub 

VBA Ejemplo # 2

Ahora, en este ejemplo, veremos otro ejemplo en el que utilizaremos el bucle For-Next para imprimir los nombres de las hojas. Para esto, siga los pasos a continuación:

Paso 1: abra un módulo y escriba el subproceso como se muestra a continuación. Podemos usar cualquier nombre para definir esto.

Código:

 Sub VBA_Examples2 () End Sub 

Paso 2: elige una variable como un entero. Podemos elegir la variable de nombre como lo hicimos en el ejemplo-1.

Código:

 Sub VBA_Examples2 () Dim A como entero Fin Sub 

Paso 3: abra un bucle For-Next como se muestra a continuación.

Código:

 Sub VBA_Examples2 () Dim A como entero para el siguiente A End Sub 

Paso 4: Seleccione la posición de la celda desde donde queremos ver los nombres de las Hojas. Aquí, como no tenemos ninguna referencia de encabezado, podemos comenzar desde la celda 1.

Código:

 Sub VBA_Examples2 () Dim A como número entero para A = 1 a hojas. Cont. Siguiente A Fin Sub 

Paso 5: Ahora asignamos la variable A con el valor de celda para ver el nombre de la hoja como se muestra a continuación.

Código:

 Sub VBA_Examples2 () Dim A como entero para A = 1 To Sheets.Count Cells (A, 1) .Value = Sheets (A) .Name Next A End Sub 

Paso 6: Ahora ejecuta el código presionando la tecla F8 o haciendo clic en el botón Reproducir.

Veremos, ya que teníamos 3 hojas, todas con nombre predeterminado, por lo que su nombre se imprimió desde la celda A1 a continuación hasta el número de Hojas que tenemos.

VBA Ejemplo # 3

En este ejemplo, aprenderemos cómo imprimir los números. Este proceso es bastante similar al que hemos visto en el ejemplo 2. Para esto, siga los pasos a continuación:

Paso 1: abra un módulo y escriba el subprocedimiento.

Código:

 Sub VBA_Examples3 () End Sub 

Paso 2: Considere una variable usando DIM como Integer. Como estamos usando los números, se debe usar el tipo de datos Entero.

Código:

 Sub VBA_Examples3 () Dim A como entero Fin Sub 

Paso 3: nuevamente abra un bucle For-Next como se muestra a continuación.

Código:

 Sub VBA_Examples3 () Dim A como entero para el siguiente A End Sub 

Paso 4: Ahora seleccione el rango de celdas desde donde queremos ver el número hasta el último en la sintaxis For.

Código:

 Sub VBA_Examples3 () Dim A como entero para A = 1 a 10 Siguiente A End Sub 

Paso 5: Ahora arregle la posición de la celda con la variable A. Aquí, el vértice de la segunda posición en la celda muestra el número de columna. Como elegimos 1, esperamos ver los números a partir de la celda A1.

Código:

 Sub VBA_Examples3 () Dim A como entero para A = 1 a 10 celdas (A, 1) .Value = A Next A End Sub 

Paso 6: Ahora ejecuta el código presionando la tecla F8 o haciendo clic en el botón Reproducir. Veremos, los números se generan desde la celda A1 a A10 a partir del 1 al 10 .

Paso 7: ¿Qué sucede si intentamos agregar estos números en la segunda columna? Cambie el vértice de la columna de 1 a 2. O agregue otra línea de código como se muestra a continuación.

Código:

 Sub VBA_Examples3 () Dim A como entero para A = 1 a 10 celdas (A, 1) .Value = A Cells (A, 2) .Value = A Next A End Sub 

Paso 8: Ejecute nuevamente el código completo presionando la tecla F8 o haciendo clic en el botón Reproducir. Veremos que el mismo número a partir del 1 al 10 se imprimió en la columna B también de la celda B1 a B10.

VBA Ejemplo # 4

En este ejemplo, veremos cómo cambiar el color de las celdas en blanco de los rangos seleccionados. Para esto, hemos utilizado el mismo número que en el ejemplo anterior, pero hemos eliminado algunas de las celdas para obtener la salida.

Paso 1: Abra un módulo, escriba el subproceso como se muestra a continuación.

Código:

 Sub VBA_Example4 () End Sub 

Paso 2: Defina una variable usando DIM como Rango, ya que estamos seleccionando el rango de números existente.

Código:

 Sub VBA_Example4 () Dim A As Range End Sub 

Paso 3: ahora establezca esta variable como Selección

Código:

 Sub VBA_Example4 () Dim A As Range Set A = Selection End Sub 

Paso 4: Ahora seleccione el Rango de números usando la variable A definida y elija xlCellTypeBlanks para seleccionar solo las celdas en blanco.

Código:

 Sub VBA_Example4 () Dim A As Range Set A = Selection A.Cells.SpecialCells (xlCellTypeBlanks). End Sub 

Paso 5: ahora para cambiar el color interior de las celdas en blanco, use Interior.Color y elija el color con el que queremos resaltar las celdas en blanco. Utilice el tipo vbBlue o vbGreen para definir el color. El uso de vb es imprescindible.

Código:

 Sub VBA_Example4 () Dim A As Range Set A = Selection A.Cells.SpecialCells (xlCellTypeBlanks) .Interior.Color = vbBlue End Sub 

Paso 6: Ahora seleccione el rango de celdas y luego ejecute el código presionando la tecla F8 o haciendo clic en el botón Reproducir. Veremos, las celdas A4 y A7 que estaban en blanco, ahora están resaltadas con el color azul como se muestra a continuación.

Pros y contras de Excel VBA Ejemplos

  • VBA aumenta la eficiencia del trabajo.
  • Con esto, queremos reducir las tareas repetitivas de una vez.
  • Podemos crear cualquier tipo de macro que queramos.
  • También podemos grabar una macro si la codificación no es fácil.
  • Las personas que no tienen conocimientos o ideas de codificación pueden tener dificultades para usar VBA Macro.

Cosas para recordar

  • El principiante en VBA debe tener en cuenta para guardar el código en formato de Excel habilitado para macros. Esto nos permitirá retener el código en el mismo archivo.
  • Siempre compile el código completo, incluso si el código es de una línea. Esto reducirá nuestro tiempo de depuración si enfrenta algún error mientras se ejecuta el código.
  • Siempre comience el proceso de aprendizaje de VBA o cualquier otro lenguaje de codificación con código pequeño y fácil. Esto le dará una mejor comprensión y confianza.

Artículos recomendados

Esta es una guía de ejemplos de VBA en Excel. Aquí discutimos algunos ejemplos útiles de código de macro VBA en Excel junto con la plantilla de Excel descargable. También puede consultar nuestros otros artículos sugeridos:

  1. Colección VBA (Ejemplos)
  2. Declaraciones VBA IF | Plantillas Excel
  3. ¿Cómo utilizar la función de clasificación de Excel VBA?
  4. VBA While Loop (Ejemplos con plantilla de Excel)
  5. VBA Environ

Categoría: