VBA Union - Как использовать функцию Excel VBA Union?

Содержание:

Anonim

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. Вы также можете просмотреть наши другие предлагаемые статьи -

  1. Функция копирования и вставки в VBA
  2. Функция подстроки Excel
  3. Индекс VBA вне диапазона
  4. Excel ISNUMBER Formula