Метод Application.Union (Excel)

Статья
04/07/2023

Возвращает объединение двух или более диапазонов.

Синтаксис

expression. Объединение (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)

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Arg1	Обязательный	Range	Необходимо указать по крайней мере два объекта Range .
Arg2	Обязательный	Range	Необходимо указать по крайней мере два объекта Range .
Arg3 — Arg30	Необязательный	Variant	Диапазон.

Возвращаемое значение

Диапазон

Пример

В этом примере объединение двух именованных диапазонов, Range1 и Range2, заполняется формулой =RAND().

Worksheets("Sheet1").Activate 
Set bigRange = Application.Union(Range("Range1"), Range("Range2")) 
bigRange.Formula = "=RAND()"

В этом примере сравнивается свойство Worksheet.Range , метод Application.Union и метод 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.

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через