VBA съюз
Както самата дума подсказва, че съюзът означава присъединяване към едно или повече неща. В VBA Union означава присъединяване на два или повече диапазона заедно. Тази функция е подобна на функцията за обхват в excel. Това е най-често срещаната ситуация в нашата работа, когато трябва да комбинираме един или повече диапазони помежду си. В тези ситуации функцията на Съюза идва много удобно.
Функциите на VBA Union се използват за комбиниране на един или повече диапазони, както е обяснено по-горе. Можем да използваме тази функция за комбиниране на диапазони, които имат някакъв общ критерий. Например, ако нашите данни имат стойност по-малка от определена стойност, можем да използваме тази функция, за да комбинираме тези диапазони и да ги маркираме.
Синтаксис на VBA Union в Excel
Синтаксисът за функция Union е следният:
Така например, ако искаме да комбинираме диапазон A1: A5 и B1: B5, ще използваме следната формула,
Съединение (обхват („A1: A5“), обхват („B1: B5“)
Можем да направим много повече с тази функция и ще видим чрез различни примери за това как да използваме тази функция в VBA.
Първо, нека се уверим, че имаме раздела на програмист, активиран от раздела с файлове в секцията с опции, така че да можем да започнем да използваме VBA в excel.
Как да използвате VBA Union функция в Excel?
Ще научим как да използваме функция VBA Union с няколко примера в excel.
Можете да изтеглите този шаблон на VBA Union Excel тук - шаблон на VBA Union ExcelПример №1 - VBA съюз
В първия пример нека се опитаме да изберем два диапазона заедно. Нека в този пример да изберем заедно диапазона A1: A5 и B1: B5.
Следвайте стъпките по-долу, за да използвате функцията VBA Union в Excel:
Стъпка 1: Разбира се, че трябва да отворим редактора на VB от visual basic, който е в раздела на програмиста.
Стъпка 2: Веднъж след като сме в VB Editor, продължете напред и поставете нов модул от секцията за вмъкване. Модулът, който сме поставили, щракнете два пъти върху него, за да можем да започнем да пишем код.
Стъпка 3: След като сме в прозореца с кода, наречете макроса, както следва,
Код:
Подпроба () Край Sub
Стъпка 4: Тъй като ще работим с лист 1, първо трябва да го активираме, за да използваме неговите свойства.
Код:
Подпроба () Работни листове ("Sheet1"). Активиране на крайния Sub
Стъпка 5: Сега ще използваме функцията на обединение, за да комбинираме двата диапазона, за които сме говорили по-горе, със следния код.
Код:
Подпроба () Работни листове ("Sheet1"). Активирайте Application.Union (обхват ("A1: A5"), обхват ("B1: B5")). Изберете End Sub
Стъпка 6: След като изпълним кода по-горе, на лист 1 можем да видим, че тези два диапазона са в нашия избор. Натиснете F5 или го направете ръчно от бутона за стартиране, за да видите следния резултат.
В горния пример сме избрали само двата диапазона, но можем да направим много повече, което ще научим в следващите примери.
Пример №2 - VBA съюз
Сега в този пример нека да изберем два диапазона както по-горе заедно и да променим техния интериорен цвят. Можем да променим формат или да променим стойностите, след като заедно комбинираме и избираме диапазоните.
Стъпка 1: Отидете на меню „Вмъкване“ и щракнете върху модула
Стъпка 2: Декларирайте име за подфункцията за втория пример,
Код:
Sub Sample1 () Край Sub
Стъпка 3: Нека първо активираме лист 2, тъй като в този пример ще използваме свойствата на лист 2.
Код:
Sub Sample1 () работни листове ("Sheet2"). Активиране на крайния Sub
Стъпка 4: Комбинирайте два диапазона A1: B5 и C1: D5 с функция на диапазона и променете интериорния цвят на тъмночервен чрез следния код.
Код:
Sub Sample1 () Работни листове ("Sheet2"). Активирайте Application.Union (обхват ("A1: B5"), обхват ("C1: D5")). Интериор.Color = 255 End Sub
Стъпка 5: Изпълнете горното и вижте резултата в лист 2, както следва,
Променихме цвета на диапазоните след комбинирането им, тъй като виждаме, че те все още са в селекция.
Пример №3 - VBA съюз
Сега нека използваме функция за обединяване за показване на адреса след комбиниране на диапазони. Ще комбинираме диапазон A1: C4 и E1: F4 и ще покажем адреса в прозореца за незабавно. Непосредствен прозорец е точно под нашия кодов прозорец или можем да натиснем CTRL + G, за да го покажем.
Стъпка 1: Отидете на меню „Вмъкване“ и кликнете върху модула,
Стъпка 2: Име на име на макрос за този трети пример.
Код:
Sub Sample2 () Край Sub
Стъпка 3: Декларирайте две променливи като диапазон в следващата стъпка, както следва.
Код:
Sub Sample2 () Dim rng1 As Range Dim item As Range End Sub
Стъпка 4: Сега задайте променлива rng1 като обединение на диапазона A1: C4 и E1: F4, както следва,
Код:
Sub Sample2 () Dim rng1 As Range Dim item As Range Set rng1 = Union (обхват („A1: C4“), обхват („E1: F4“)) End Sub
Стъпка 5: Сега използвайте за цикъл, за да пренесете адреса на тези клетки от комбинираните диапазони със следния код,
Код:
Sub Sample2 () Dim rng1 As Range Dim item As Range Set rng1 = Union (диапазон ("A1: C4"), обхват ("E1: F4")) За всеки елемент In rng1 Debug.Print item.Adress Следващ елемент End Sub
Стъпка 6: След като стартираме горния код, можем да видим резултата в непосредствения прозорец, както следва,
Приложение на VBA съюз
VBA обединението се използва от следния синтаксис:
Expression.Union (обхват1, обхват2, … ..)
Тук можем да използваме колкото се може повече диапазони.
Неща, които трябва да запомните
Има няколко неща, които трябва да помним за обединението във VBA:
- Съюзът се използва за комбиниране на два или повече диапазона заедно.
- Диапазоните, които даваме на функцията, трябва да съществуват, за да се избегне грешка.
- Вместо приложение. Съюз можем просто да използваме съюза, тъй като работим в самия excel.
Препоръчителни статии
Това е ръководство за VBA Union. Тук обсъждаме как да използвате Excel VBA Union Function, заедно с практически примери и шаблон за excel за сваляне. Можете да разгледате и другите ни предложени статии -
- Функция за копиране на поставяне в VBA
- Функция Substring Excel
- VBA абонамент извън обхвата
- Excel ISNUMBER Formula