Unión VBA
Como la palabra misma sugiere unión significa unir una o más cosas. En VBA Union significa unir dos o más rangos juntos. Esta función es similar a la función de rango en excel. Esta es la situación más común en nuestro trabajo cuando necesitamos combinar uno o más rangos entre sí. La función sindical es muy útil en esas situaciones.
Las funciones VBA Union se utilizan para combinar uno o más rangos como se explicó anteriormente. Podemos usar esta función para combinar rangos que tienen algún tipo de criterio común. Por ejemplo, si nuestros datos tienen un valor inferior a un valor específico, podemos usar esta función para combinar esos rangos y resaltarlos.
Sintaxis de VBA Union en Excel
La sintaxis para la función Unión es la siguiente:
Entonces, por ejemplo, si queremos combinar un rango A1: A5 y B1: B5 usaremos la siguiente fórmula,
Unión (Rango (“A1: A5”), Rango (“B1: B5”)
Podemos hacer mucho más con esta función y veremos a través de varios ejemplos sobre cómo usar esta función en VBA.
Primero, asegurémonos de tener una pestaña de desarrollador habilitada desde la pestaña de archivos en la sección de opciones para que podamos comenzar a usar VBA en Excel.
¿Cómo utilizar la función de unión VBA en Excel?
Aprenderemos cómo usar una función VBA Union con algunos ejemplos en Excel.
Puede descargar esta plantilla Excel de VBA Union aquí - Plantilla Excel de VBA UnionEjemplo # 1 - Unión VBA
En el primer ejemplo, intentemos seleccionar dos rangos juntos. Seleccionemos el rango A1: A5 y B1: B5 juntos en este ejemplo.
Siga los pasos a continuación para usar la función VBA Union en Excel:
Paso 1: Por supuesto, necesitamos abrir el editor VB desde Visual Basic, que se encuentra en la pestaña del desarrollador.
Paso 2: Ahora, una vez que estemos en VB Editor, avance e inserte un nuevo módulo desde la sección de inserción. El módulo que hemos insertado hace doble clic en él para que podamos comenzar a escribir código.
Paso 3: Una vez que estemos en la ventana de código, nombre la macro de la siguiente manera,
Código:
Sub muestra () End Sub
Paso 4: Dado que trabajaremos con la hoja 1, primero debemos activarla para usar sus propiedades.
Código:
Sub muestra () Hojas de trabajo ("Sheet1"). Active End Sub
Paso 5: Ahora usaremos la función de unión para combinar los dos rangos que hemos discutido anteriormente con el siguiente código.
Código:
Submuestra () Hojas de trabajo ("Sheet1"). Active Application.Union (Range ("A1: A5"), Range ("B1: B5")). Seleccione End Sub
Paso 6: Una vez que ejecutamos el código anterior, podemos ver en la hoja 1 que esos dos rangos están en nuestra selección. Presione F5 o hágalo manualmente desde el botón de ejecución para ver el siguiente resultado.
En el ejemplo anterior, solo hemos seleccionado los dos rangos, pero podemos hacer mucho más que aprenderemos en los siguientes ejemplos.
Ejemplo # 2 - Unión VBA
Ahora, en este ejemplo, seleccionemos dos rangos como los anteriores juntos y cambiemos su color interior. Podemos cambiar el formato o los valores una vez que combinamos y seleccionamos los rangos juntos.
Paso 1: vaya al menú Insertar y haga clic en el módulo
Paso 2: declare un nombre para la subfunción para el segundo ejemplo,
Código:
Sub Sample1 () End Sub
Paso 3: Ahora activemos la hoja 2 primero, ya que vamos a usar las propiedades de la hoja 2 en este ejemplo.
Código:
Sub Sample1 () Hojas de trabajo ("Sheet2"). Active End Sub
Paso 4: combine dos rangos A1: B5 y C1: D5 con la función de rango y cambie el color interior a rojo oscuro con el siguiente código.
Código:
Sub Sample1 () Hojas de trabajo ("Sheet2"). Active Application.Union (Range ("A1: B5"), Range ("C1: D5")). Interior.Color = 255 End Sub
Paso 5: Ejecute lo anterior y vea el resultado en la hoja 2 de la siguiente manera,
Hemos cambiado el color de los rangos después de combinarlos, ya que podemos ver que todavía están en la selección.
Ejemplo # 3 - Unión VBA
Ahora utilicemos la función de unión para mostrar la dirección después de combinar rangos. Combinaremos el rango A1: C4 y E1: F4 y mostraremos la dirección en la ventana Inmediato. Una ventana inmediata está justo debajo de nuestra ventana de código o podemos presionar CTRL + G para que aparezca.
Paso 1: ve al menú Insertar y haz clic en el módulo,
Paso 2: nombra el nombre de la macro para este tercer ejemplo.
Código:
Sub Sample2 () End Sub
Paso 3: declare dos variables como un rango en el siguiente paso de la siguiente manera.
Código:
Sub Sample2 () Dim rng1 As Range Dim item As Range End Sub
Paso 4: Ahora establezca una variable rng1 como la unión del rango A1: C4 y E1: F4 de la siguiente manera,
Código:
Sub Sample2 () Dim rng1 As Range Dim item As Range Set rng1 = Union (Range ("A1: C4"), Range ("E1: F4")) End Sub
Paso 5: ahora usa for loop para traer la dirección de estas celdas de los rangos combinados mediante el siguiente código,
Código:
Sub Sample2 () Dim rng1 As Range Dim item As Range Set rng1 = Union (Range ("A1: C4"), Range ("E1: F4")) Para cada elemento en rng1 Debug.Print item.Address Next item End Sub
Paso 6: Una vez que ejecutamos el código anterior, podemos ver el resultado en la ventana inmediata de la siguiente manera,
Aplicación de VBA Union
La unión de VBA es utilizada por la siguiente sintaxis:
Expression.Union (rango1, rango2, … ..)
Aquí podemos usar tantos rangos como necesitemos.
Cosas para recordar
Hay algunas cosas que debemos recordar sobre la unión en VBA:
- La unión se usa para combinar dos o más rangos juntos.
- Los rangos que le damos a la función deben existir para evitar un error.
- En lugar de la aplicación. Unión podemos simplemente usar la unión ya que estamos trabajando en Excel.
Artículos recomendados
Esta es una guía de VBA Union. Aquí discutimos cómo usar Excel VBA Union Function junto con ejemplos prácticos y una plantilla de Excel descargable. También puede consultar nuestros otros artículos sugeridos:
- Función de copiar y pegar en VBA
- Función de subcadena de Excel
- VBA Subíndice fuera de rango
- Fórmula ISNUMBER de Excel