VBA Union
Само по себе слово «союз» означает объединение одной или нескольких вещей. В VBA Union означает объединение двух или более диапазонов. Эта функция похожа на функцию диапазона в Excel. Это наиболее распространенная ситуация в нашей работе, когда нам нужно объединить один или несколько диапазонов друг с другом. Функция объединения в таких ситуациях очень удобна.
Функции VBA Union используются для объединения одного или нескольких диапазонов, как описано выше. Мы можем использовать эту функцию для объединения диапазонов, которые имеют какие-то общие критерии. Например, если наши данные имеют значение меньше определенного значения, мы можем использовать эту функцию, чтобы объединить эти диапазоны и выделить их.
Синтаксис VBA Union в Excel
Синтаксис для функции объединения выглядит следующим образом:
Так, например, если мы хотим объединить диапазон A1: A5 и B1: B5, мы будем использовать следующую формулу:
Союз (диапазон («A1: A5»), диапазон («B1: B5»)
С этой функцией мы можем сделать гораздо больше, и на разных примерах мы увидим, как использовать эту функцию в VBA.
Во-первых, давайте удостоверимся, что у нас включена вкладка разработчика на вкладке файлов в разделе параметров, чтобы мы могли начать использовать VBA в Excel.
Как использовать функцию объединения VBA в Excel?
Мы научимся использовать функцию VBA Union с несколькими примерами в Excel.
Вы можете скачать этот шаблон VBA Union Excel здесь - Шаблон VBA Union ExcelПример № 1 - VBA Union
В первом примере попробуем выбрать два диапазона вместе. Давайте выберем диапазон A1: A5 и B1: B5 вместе в этом примере.
Чтобы использовать функцию VBA Union в Excel, выполните следующие действия:
Шаг 1: Конечно, нам нужно открыть редактор VB из Visual Basic, который находится на вкладке разработчика.
Шаг 2: Теперь, как только мы окажемся в VB Editor, добавьте новый модуль из раздела вставки. Модуль, который мы вставили, дважды щелкнул по нему, чтобы мы могли начать писать код.
Шаг 3: Как только мы окажемся в окне кода, назовите макрос следующим образом:
Код:
Sub sample () End Sub
Шаг 4: Поскольку мы будем работать с листом 1, нам нужно сначала активировать его, чтобы использовать его свойства.
Код:
Sub sample () Worksheets ("Sheet1"). Активировать End Sub
Шаг 5: Теперь мы будем использовать функцию объединения, чтобы объединить два диапазона, которые мы обсуждали выше, со следующим кодом.
Код:
Sub sample () Worksheets ("Sheet1"). Активируйте Application.Union (Range ("A1: A5"), Range ("B1: B5")). Выберите End Sub
Шаг 6: Как только мы выполним приведенный выше код, мы увидим на листе 1, что эти два диапазона находятся в нашем выборе. Нажмите F5 или сделайте это вручную с кнопки запуска, чтобы увидеть следующий результат.
В приведенном выше примере мы выбрали только два диапазона, но мы можем сделать гораздо больше, что мы узнаем в следующих примерах.
Пример № 2 - VBA Union
Теперь в этом примере давайте выберем два диапазона, как указано выше, и изменим их цвет интерьера. Мы можем изменить формат или изменить значения, как только мы объединяем и выбираем диапазоны вместе.
Шаг 1: Перейдите в меню «Вставка» и нажмите на модуль
Шаг 2. Объявите имя подфункции для второго примера.
Код:
Sub Sample1 () End Sub
Шаг 3: Теперь давайте сначала активируем лист 2, так как мы собираемся использовать свойства листа 2 в этом примере.
Код:
Sub Sample1 () Worksheets ("Sheet2"). Активировать End Sub
Шаг 4: Объедините два диапазона A1: B5 и C1: D5 с функцией диапазона и измените цвет салона на темно-красный с помощью следующего кода.
Код:
Sub Sample1 () Worksheets ("Sheet2"). Активируйте Application.Union (Range ("A1: B5"), Range ("C1: D5")). Interior.Color = 255 End Sub
Шаг 5: Выполните вышеописанное и посмотрите результат на листе 2 следующим образом:
Мы изменили цвет диапазонов после их объединения, поскольку видим, что они все еще находятся в выделении.
Пример № 3 - VBA Union
Теперь давайте использовать функцию объединения для отображения адреса после объединения диапазонов. Мы скомбинируем диапазон A1: C4 и E1: F4 и отобразим адрес в окне Immediate. Непосредственное окно находится чуть ниже нашего окна кода, или мы можем нажать CTRL + G, чтобы вызвать его.
Шаг 1: Перейдите в меню «Вставка» и нажмите на модуль,
Шаг 2: Назовите имя макроса для этого третьего примера.
Код:
Sub Sample2 () End Sub
Шаг 3: Объявите две переменные в качестве диапазона на следующем шаге следующим образом.
Код:
Sub Sample2 () Dim rng1 As Range Dim item Как Sub End End
Шаг 4: Теперь установите переменную rng1 как объединение диапазона A1: C4 и E1: F4 следующим образом:
Код:
Sub Sample2 () Dim rng1 As Range Dim Item As Range Set rng1 = Объединение (Range ("A1: C4"), Range ("E1: F4")) End Sub
Шаг 5: Теперь используйте цикл for, чтобы вывести адрес этих ячеек из объединенных диапазонов с помощью следующего кода:
Код:
Sub Sample2 () Dim rng1 As Range Dim item В качестве диапазона Set rng1 = Union (Range ("A1: C4"), Range ("E1: F4")) для каждого элемента в rng1 Debug.Print item.Address Следующий элемент End Sub
Шаг 6: Как только мы запустим приведенный выше код, мы увидим результат в ближайшем окне следующим образом:
Применение VBA Union
VBA union использует следующий синтаксис:
Expression.Union (range1, range2, … ..)
Здесь мы можем использовать столько диапазонов, сколько нам нужно.
То, что нужно запомнить
Есть несколько вещей, которые мы должны помнить о союзе в VBA:
- Объединение используется для объединения двух или более диапазонов вместе.
- Диапазоны, которые мы даем функции, должны существовать, чтобы избежать ошибки.
- Вместо приложения. Союз, мы можем просто использовать союз, так как мы работаем в самом Excel.
Рекомендуемые статьи
Это руководство к VBA Union. Здесь мы обсудим, как использовать функцию Excel VBA Union вместе с практическими примерами и загружаемым шаблоном Excel. Вы также можете просмотреть наши другие предлагаемые статьи -
- Функция копирования и вставки в VBA
- Функция подстроки Excel
- Индекс VBA вне диапазона
- Excel ISNUMBER Formula