VBA Оператори | Списък на операторите на Excel VBA (примери)

Оператори на Excel VBA

Във VBA операторите се използват за проверка дали едно число е по-голямо от друго или по-малко от друго или равно на друго число и не е равно на също. Методът е подобен на използването на операторите, както използваме в Excel, като A> B, използвайки оператор за сравнение.

Няма значение колко сме добри или колко опитни сме в работата си, ако не направим правилно основите, тогава всичко ще бъде в бъркотия. Първо, ако не научим правилно основите, тогава не можем да преминем към следващото ниво, било то всяка професия. Причината да настоявам толкова много за основите, защото в днешната статия ще ви покажем една от основните концепции „VBA оператори“.

Операторите са сърцето на всяко изчисление. Те са знаците, които използваме, за да сравняваме едно нещо с друго. Сигурен съм, че трябва да сте използвали тези логики на ежедневното си работно място.

Списък на математическите оператори

По-долу е списъкът на математическите оператори, който използваме редовно.

По-горе са математическите оператори, които са общи за всички. Имаме и оператори за сравнение, по-долу е списъкът с тях.

Списък на операторите за сравнение за VBA

  • Знак на равенство (=)
  • По-голям знак (>)
  • По-голямо или равно на знак (> =)
  • По-малко от знак (<)
  • Не е равно на знак ()

Нека обсъдим подробно тези оператори.

Можете да изтеглите този шаблон на VBA за оператори в Excel тук - VBA за оператори в Excel

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

Този знак се използва за сравнение дали едно нещо е равно на друго. Резултатът от този знак на оператор е TRUE или FALSE. Ако едно нещо е равно на друго, ще получим TRUE или иначе FALSE.

По-долу е даден кода на VBA, за да разберете използването на  оператора Equal (=) .

Код:

 Sub Equal_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 25 Ако Val1 = Val2 Тогава MsgBox "И двете са еднакви и резултатът е TRUE" Else MsgBox "И двете не са еднакви и резултатът е FALSE" End If End 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 Ако 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 и след това ще стартираме кода.

И двата резултата връщат ИСТИНА, защото сме приложили знака> =.

По-малко от знак (<)

Този знак проверява дали едното число е по-малко от другото. Това също е логичен оператор във VBA, където резултатът е TRUE или FALSE.

По-долу е VBA кодът, за да разберете използването на  оператора по-малко от (<) .

Код:

 Sub Less_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 20 Ако Val1 <Val2 Тогава MsgBox "Val1 е по-малък от val2 и резултатът е TRUE" Else MsgBox "Val1 не е по-малък от val2 и резултатът е FALSE "End If End Sub

Това връща FALSE, защото 25 е не по-малко от 20.

Не е равно на знак ()

Това не е равно на знак е обратният оператор връща обратни резултати. Ако едно нещо е равно на друго, то връща FALSE или TRUE.

По-долу е даден Кодексът за разбиране на използването на VBA Не е равен () оператор.

Код:

 Sub NotEqual_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 20 Ако Val1 Val2 Тогава MsgBox "Val1 не е равен на val2 и резултатът е TRUE" Else MsgBox "Val1 е равен на val2 и резултатът е FALSE" End If Крайна под

Ще получите следния изход.