Excel VBA И функция
И е логическа функция, както и логически оператор, което означава, че ако всички условия, предвидени в тази функция са изпълнени, тогава само ние ще имаме истинския резултат, докато ако някое от условията не успее, изходът се връща в false, имаме вградена И команда във VBA за използване.
Надявам се да сте прегледали статията ни за „VBA ИЛИ“ и „VBA АКО ИЛИ.“ Тази функция е точно обратната на функцията OR. Във функцията OR се нуждаехме от някой от предоставените логически условия, за да получим резултата като TRUE. Но във функцията И е точно обратното. За да получите резултата от TRUE, трябва да бъдат изпълнени всички предоставени логически тестове в Excel.
Добре, вижте синтаксиса на функцията И в Excel.
(Логически тест) И (Логически тест) И (Логически тест)

В горното имам два тестови резултата от 600.
В колоната с резултати трябва да получа резултата като TRUE, ако резултатът от двата теста е по-голям от равен на 250.
Погледнете изображението по-долу.

Когато приложим логическата функция И получихме резултатите. В клетка C4 и C5 получихме резултата като TRUE, тъй като резултатите от Test 1 и Test 2 са по-големи или равни на 250.
Погледнете клетката C6 тук. Имаме FALSE, въпреки че резултатът от тест 2 е равен на 250. Това е така, защото в тест 1 резултатът е само 179.
Примери за използване на VBA и функция
Пример # 1
Например, ще тестваме числата тук, независимо дали 25> = 20 и 30 <= 31.
Стъпка 1: Декларирайте променливата като String.
Код:
Sub AND_Example1 () Dim K As String End Sub

Стъпка 2: За променливата „k“ ще присвоим стойността чрез прилагане на функцията И.
Код:
Sub AND_Example1 () Dim K As String K = End Sub

Стъпка 3: Поставете първото условие като 25> = 20.
Код:
Sub AND_Example1 () Dim K As String K = 25> = 20 End Sub

Стъпка 4: Сега отворете функцията И и предоставете втория логически тест, т.е. 30 <= 29.
Код:
Sub AND_Example1 () Dim K As String K = 25> = 20 And 30 <= 29 End Sub

Стъпка 5: Сега покажете резултата от променливата „k“ в полето за съобщения във VBA.
Код:
Sub AND_Example1 () Dim K As String K = 25> = 20 And 30 <= 29 MsgBox K End Sub

Изпълнете макроса, за да видите какъв е резултатът.

Получихме резултата като FALSE, тъй като от приложените две условия, първото условие 25> = 20, това условие е изпълнено, така че резултатът е TRUE, а второто условие 30 <= 29 това не е изпълнено резултатът е FALSE. За да получите резултата като TRUE, трябва да са изпълнени и двете условия.
Пример # 2
Сега ще сменя логическия тест на „100> 95 И 100 <200.“
Код:
Sub AND_Example2 () Dim k As String k = 100> 95 И 100 <200 MsgBox k End Sub
Изпълнете кода, за да видите резултата.

Тук получихме TRUE като резултат, защото
1- ви логически тест: 100> 95 = ИСТИНА
2- ри логически тест: 100 <200 = TRUE
Тъй като получихме ИСТИНСКИ резултати и за двата логически теста, крайният ни резултат като ИСТИНСКИ.
Пример # 3
Сега ще видим данни от работния лист. Използвайте данните, които сме използвали, за да покажем примера на функцията excel И.

Тук условието е Тест 1 Резултат> = 250 И Тест 2 Резултат> = 250 .
Тъй като имаме повече от една клетка с данни, трябва да използваме цикли, за да избегнем писането на ненужни и отнемащи време редове кодове. Написах кода по-долу за вас; формулата и логиката са едно и също, единственото нещо е, че използвах „VBA за следващ цикъл“.
Код:
Sub AND_Example3 () Dim k Като цяло за k = 2 до 6 клетки (k, 3). Стойност = клетки (k, 1)> = 250 и клетки (k, 2)> = 250 Следващ k Край Sub
Това ще даде резултата абсолютно същият като функцията на работния ни лист, но няма да получим формули. Получаваме само резултати.

По този начин можем да приложим логическата функция И за тестване на множество условия, които всички трябва да са ИСТИНА, за да се получат желаните резултати.
Това работи напълно противоположно на функцията ИЛИ, където ИЛИ изисква някое от предоставените условия да е ИСТИНА, за да се получат резултатите, но И изисква 100% резултат в логически тест, за да се получат резултатите.