АКО ИЛИ не са единичен израз, това са две логически функции, които се използват заедно няколко пъти във VBA, ние използваме тези две логически функции заедно, когато имаме повече от един критерий, с който да проверим и ако някой от критериите е изпълнен, получаваме истинския резултат, когато използваме оператора if или изразът се използва между двата критерия на оператора If.
АКО ИЛИ функция във VBA
Логическите функции са сърцевината на всякакви изчисления, базирани на критерии. „IF“ е най-популярната логическа функция, било то като функция на работен лист или като функция на VBA, тя служи отлично за нашите нужди. Но още една логическа функция, „ИЛИ“ в Excel, е най-недооценената функция. Също така е важно да овладеете, когато става въпрос за решаване на сложни изчисления. В тази статия ще ви преведем подробно през функцията VBA IF OR OR. Прочетете цялата статия, за да получите подробно функцията.

Как да използвам IF с функция OR в VBA?
Ще ви покажем един прост пример за използване на функцията IF OR в VBA.
Комбинацията от логически функции е най-добрата двойка в Excel. Когато комбинирате много логически формули в другата логическа формула, това предполага, че изчислението изисква много условия за тестване.
Сега вижте синтаксиса на функцията IF OR във VBA.
(Тест) ИЛИ (Тест) ИЛИ (Тест)
Това е същото, което видяхме в примера на работния лист. За по-добро разбиране погледнете примера по-долу.

Тук имаме цената от предходния месец, последната 6-месечна средна цена и текущата месечна цена.
За да решим дали да закупим продукта или не, трябва да направим някои тестове тук и тези тестове са.
Ако текущата цена е по-малка или равна на която и да е от другите две цени, трябва да получим резултата като „Купете“ или иначе трябва да получим резултата като „Не купувайте“.
Стъпка 1: Отворете IF условие вътре в подпроцедурата.
Код:
Под IF_OR_Example1 () Ако Край Sub

Стъпка 2: Вътре в условието IF, приложете първия логически тест като диапазон („D2"). Стойност <= диапазон („B2"). Стойност
Код:
Под IF_OR_Example1 () Ако диапазон (“D2”). Стойност <= диапазон (“B2”). Стойност Край Sub

Стъпка 3: Първото логическо условие е направено, сега отворено ИЛИ израза.
Код:
Под IF_OR_Example1 () Ако диапазон ("D2"). Стойност <= диапазон ("B2"). Стойност ИЛИ Край Sub

Стъпка 4: Сега приложете второто логическо условие като диапазон („D2"). Стойност <= диапазон („C2"). Стойност
Код:
Под IF_OR_Example1 () Ако диапазон ("D2"). Стойност <= диапазон ("B2"). Стойност ИЛИ диапазон ("D2"). Стойност <= диапазон ("C2"). Стойност Край Sub

Стъпка 5: Добре, приключихме с логическите тестове тук. След логическите тестове сложете думата „Тогава“.
Код:
Под IF_OR_Example1 () Ако диапазон ("D2"). Стойност <= диапазон ("B2"). Стойност или диапазон ("D2"). Стойност <= диапазон ("C2"). Стойност След това край Sub

Стъпка 6: В следващия ред напишете какъв трябва да бъде резултатът, ако логическият тест е TRUE. Ако условието е ИСТИНСКИ, имаме нужда от резултата като „Купи“ в клетка E2.
Код:
Под IF_OR_Example1 () Ако диапазон ("D2"). Стойност <= диапазон ("B2"). Стойност или диапазон ("D2"). Стойност <= диапазон ("C2"). Стойност След това диапазон ("E2"). Стойност = "Купете" Край на под

Стъпка 7: Ако резултатът е FALSE, трябва да получим резултата като „Не купувайте“. Така че в следващия ред поставете „Else“ и напишете кода в следващия ред.
Код:
Под IF_OR_Example1 () Ако диапазон ("D2"). Стойност <= диапазон ("B2"). Стойност или диапазон ("D2"). Стойност <= диапазон ("C2"). Стойност След това диапазон ("E2"). Стойност = "Купете" Друг диапазон ("E2"). Стойност = "Не купувайте" Край Под

Стъпка 8: Затворете израза IF с думата „End If“.
Код:
Под IF_OR_Example1 () Ако диапазон ("D2"). Стойност <= диапазон ("B2"). Стойност или диапазон ("D2"). Стойност <= диапазон ("C2"). Стойност След това диапазон ("E2"). Value = "Buy" Else Range ("E2"). Value = "Do not Buy" End If End Sub

Добре, приключихме с частта за кодиране.
Нека да стартираме този код с F5 или ръчно чрез опцията за изпълнение и да видим какъв е резултатът в клетка E2.

Получихме резултата като „Купете“, тъй като текущата месечна цена на Apple е по-малка от цената както на „Предишния месец“, така и на „6-месечна средна цена“.
АКО ИЛИ VBA Функция с цикли (Разширено)
След като разберете формулата, опитайте се да я използвате с по-голям брой клетки. В случай на по-голям брой клетки, не можем да напишем нито един ред код, така че трябва да използваме VBA цикли.
За горния набор от данни добавих още няколко реда.

Тук трябва да използваме цикъла For Next.
Просто запазете текущия код такъв, какъвто е.
Декларирайте променливата като цяло число.

Сега отворете за следващ цикъл от 2 до 9.

Сега, където и да имаме препратка към клетка, променете текущия номер и свържете променливата „k“ с тях.
Например диапазон („D2“). Стойността трябва да бъде диапазон („D“ & k). Стойност

Сега стартирайте кода. Трябва да получим статуса във всички клетки.

Можете да копирате кода по-долу.
Код:
Под IF_OR_Example1 () Dim k като цяло число за k = 2 до 9, ако диапазон ("D" & k). Стойност <= Обхват ("B" & k). Стойност или диапазон ("D" & k). Стойност <= Обхват ("C" & k). Стойност След това обхват ("E" & k). Value = "Купете" Друг обхват ("E" & k). Стойност = "Не купувайте" Край Ако следващ k Край Под