Оператори VBA | Список операторів Excel VBA (приклади)

Оператори Excel VBA

У VBA оператори використовують, щоб перевірити, чи одне число більше іншого чи менше іншого, чи дорівнює іншому числу, а також не дорівнює. Метод подібний до використання операторів, як ми використовуємо в Excel, таких як A> B, використовуючи оператор порівняння.

Неважливо, наскільки ми добрі або наскільки ми добре працюємо у своїй роботі, якщо ми не будемо правильно робити основи, тоді все буде в халепі. По-перше, якщо ми не вивчимо ази правильно, тоді ми не зможемо перейти на наступний рівень, будь то будь-яка професія. Причина, по якій я так сильно натискаю на основи, тому що в сьогоднішній статті ми покажемо вам одне з основних понять «Оператори VBA».

Оператори - це серце будь-якого розрахунку. Вони є ознаками, якими ми порівнюємо одне з іншим. Я впевнений, ви, мабуть, використовували ці логіки на своєму щоденному робочому місці.

Список математичних операторів

Нижче наведено список математичних операторів, якими ми регулярно користуємось.

Вище наведені математичні оператори, які є загальними для всіх. У нас також є оператори порівняння, нижче наведено їх список.

Список операторів порівняння для VBA

  • Знак рівності (=)
  • Знак більший (>)
  • Більше або дорівнює знаку (> =)
  • Менше знака (<)
  • Не дорівнює знаку ()

Давайте детально обговоримо ці оператори.

Ви можете завантажити цей шаблон Excel для операторів VBA тут - Шаблон Excel для операторів VBA

Знак рівності (=)

Цей знак використовується для порівняння того, чи одна річ дорівнює іншій. Результатом цього знака оператора є TRUE або FALSE. Якщо одна річ дорівнює іншій, то ми отримаємо TRUE або інакше FALSE.

Нижче наведено код VBA для розуміння використання  оператора Equal (=) .

Код:

 Sub Equal_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 25 If Val1 = Val2 Тоді MsgBox "Обидва однакові, а результат ІСТИНА" Інакше MsgBox "Обидва не однакові і результат FALSE" Кінець Якщо кінець Sub 

Це поверне результат як TRUE, оскільки значення змінних “Val1” і “Val2” однакові.

Знак більший (>)

Цей знак перевіряє, чи одне число більше за інше. Це також логічний оператор VBA, де результат є TRUE або FALSE.

Нижче наведено код VBA для розуміння використання  оператора Greater Than (>) .

Код:

 Sub Greater_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 20 If Val1> Val2 Тоді MsgBox "Val1 більше, ніж val2 і результат TRUE" Else MsgBox "Val1 не більше val2 і результат FALSE "End If End Sub 

І результат буде -

Більше або дорівнює знаку (> =)

Цей знак працює точно так само, як і вищевказаний оператор Greater Than, але перевіряє, чи дорівнює число чи ні.

Нижче наведено код VBA для розуміння використання  оператора Greater Than або Equal (> =) .

Код:

 Sub Greater_Than_Equal_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 20 If Val1> = Val2 Тоді MsgBox "Val1 більше, ніж val2 і результат TRUE" Else MsgBox "Val1 не перевищує val2 і результат є FALSE "End If End Sub 

Тепер ми просто змінимо суму val2 на 25, а потім запустимо код.

Обидва результати повертають TRUE, оскільки ми застосували знак> =.

Менше знака (<)

Цей знак перевіряє, чи одне число менше іншого числа. Це також логічний оператор у VBA, де результат або TRUE, або FALSE.

Нижче наведено код VBA для розуміння використання  оператора Менше (<) .

Код:

 Sub Less_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 20 If Val1 <Val2 then MsgBox "Val1 is less than the val2 and result is TRUE" Else MsgBox "Val1 is not less than the val2 and result is FALSE "End If End Sub 

Це повертає FALSE, оскільки 25 - це не менше 20.

Не дорівнює знаку ()

Це не дорівнює знаку - оператор зворотного результату повертає обернені результати. Якщо одна річ дорівнює іншій, вона повертає FALSE або TRUE.

Нижче наведено Кодекс для розуміння використання оператора VBA Not Equal ().

Код:

 Sub NotEqual_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 20 If Val1 Val2 Тоді MsgBox "Val1 не дорівнює val2 і результат TRUE" Else MsgBox "Val1 дорівнює val2 і результат FALSE" End If Кінець Sub 

Ви отримаєте наступний результат.