Método Application.Union (Excel)
Devuelve la unión de dos o más rangos.
Sintaxis
expresión. Unión (Arg1, Arg2, Arg3, Arg4, Arg5, Arg6, Arg7, Arg8, Arg9, Arg10, Arg11, Arg12, Arg13, Arg14, Arg15, Arg16, Arg17, Arg18, Arg19, Arg20, Arg21, Arg22, Arg23, Arg24, Arg25, Arg26, Arg27, Arg28, Arg29, Arg30)
expresión Variable que representa un objeto Application.
Parámetros
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Arg1 | Obligatorio | Range | Se deben especificar al menos dos objetos Range. |
| Arg2 | Obligatorio | Range | Se deben especificar al menos dos objetos Range. |
| Arg3 – Arg30 | Opcional | Variant | Un rango. |
Valor devuelto
Rango
Ejemplo
Este ejemplo rellena la unión de dos rangos con nombre, Rango1 y Rango2, con la fórmula =RAND().
Worksheets("Sheet1").Activate
Set bigRange = Application.Union(Range("Range1"), Range("Range2"))
bigRange.Formula = "=RAND()"
En este ejemplo se compara la propiedad Worksheet.Range, el método Application.Union y el método Application.Intersect.
Range("A1:A10").Select 'Selects cells A1 to A10.
Range(Range("A1"), Range("A10")).Select 'Selects cells A1 to A10.
Range("A1, A10").Select 'Selects cells A1 and A10.
Union(Range("A1"), Range("A10")).Select 'Selects cells A1 and A10.
Range("A1:A5 A5:A10").Select 'Selects cell A5.
Intersect(Range("A1:A5"), Range("A5:A10")).Select 'Selects cell A5.
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.