Provozovatelé VBA | Seznam operátorů Excel VBA (příklady)

Operátoři VBA aplikace Excel

Ve VBA se operátoři používají ke kontrole, zda je jedno číslo větší než jiné nebo menší než jiné nebo rovné jinému číslu a nerovná se také. Metoda je podobná použití operátorů, které používáme v aplikaci Excel, například A> B používá operátor porovnání.

Nezáleží na tom, jak dobří jsme nebo jak zdatní ve své práci jsme, pokud nebudeme dělat základní věci správně, pak bude všechno v nepořádku. Za prvé, pokud se nenaučíme správně základy, pak nemůžeme postoupit na další úroveň, ať už je to jakákoli profese. Důvod, proč tolik tlačím na základy, protože v dnešním článku vám ukážeme jeden ze základních konceptů „VBA operátoři“.

Operátoři jsou srdcem každého výpočtu. Jsou to znaky, které používáme k porovnání jedné věci s druhou. Jsem si jistý, že jste tyto logiky museli používat na svém každodenním pracovišti.

Seznam matematických operátorů

Níže je uveden seznam matematických operátorů, který pravidelně používáme.

Nahoře jsou matematické operátory a ty jsou společné všem. Máme také operátory porovnání, níže je seznam těch.

Seznam srovnávacích operátorů pro VBA

  • Znaménko rovnosti (=)
  • Znamení větší než (>)
  • Větší než nebo rovno se přihlásit (> =)
  • Méně než podepsat (<)
  • Není rovno podepsat ()

Pojďme podrobně diskutovat o těchto operátorech.

Tuto šablonu Excel operátorů VBA si můžete stáhnout zde - šablona Excel operátorů VBA

Znaménko rovnosti (=)

Toto znaménko se používá k porovnání, zda se jedna věc rovná druhé. Výsledek tohoto znaku operátoru je TRUE nebo FALSE. Pokud se jedna věc rovná druhé, dostaneme PRAVDA nebo NEPRAVDA.

Níže je uveden kód VBA k pochopení použití  operátoru Equal (=) .

Kód:

 Sub Equal_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 25 If Val1 = Val2 Then MsgBox "Both are same and result is TRUE" Else MsgBox "Both are not same and result is FALSE" End If End Sub 

Výsledek se vrátí jako PRAVDA, protože hodnoty proměnných „Val1“ a „Val2“ jsou stejné.

Znamení větší než (>)

Toto znaménko kontroluje, zda je jedno číslo větší než druhé číslo. Toto je také logický operátor VBA, kde je výsledek TRUE nebo FALSE.

Níže je uveden kód VBA, který slouží k pochopení použití  operátoru Greater Than (>) .

Kód:

 Sub Greater_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 20 If Val1> Val2 Then MsgBox "Val1 is greater than the val2 and result is TRUE" Else MsgBox "Val1 is not greater than the val2 and result is FALSE "Konec, pokud Konec Sub 

A výsledek bude -

Větší než nebo rovno se přihlásit (> =)

Toto znaménko funguje přesně stejně jako výše uvedený operátor Greater Than, ale kontroluje, zda je počet stejný nebo ne.

Níže je uveden kód VBA k pochopení použití  operátoru Greater Than nebo Equal to (> =) .

Kód:

 Sub Greater_Than_Equal_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 20 If Val1> = Val2 Then MsgBox "Val1 is greater than the val2 and result is TRUE" Else MsgBox "Val1 is not greater than the val2 and result is FALSE "End If End Sub 

Nyní jen změníme hodnotu val2 na 25 a poté spustíme kód.

Oba výsledky vracejí PRAVDU, protože jsme použili znaménko> =.

Méně než podepsat (<)

Toto znaménko kontroluje, zda je jedno číslo menší než druhé číslo. Toto je také logický operátor ve VBA, kde je výsledek TRUE nebo FALSE.

Níže je uveden kód VBA, který rozumí použití  operátoru Less Than (<) .

Kód:

 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 "Konec, pokud Konec Sub 

Tím se vrátí FALSE, protože 25 není menší než 20.

Není rovno podepsat ()

To není rovno znaménku je inverzní operátor vrací inverzní výsledky. Pokud se jedna věc rovná druhé, vrátí FALSE nebo TRUE.

Níže je uveden kód, který slouží k pochopení použití operátoru VBA Not Equal ().

Kód:

 Sub NotEqual_Operator () Dim Val1 As String Dim Val2 As String Val1 = 25 Val2 = 20 If Val1 Val2 Then MsgBox "Val1 is not to val2 and result is TRUE" Else MsgBox "Val1 is equal to val2 and result is FALSE" End If End Sub 

Získáte následující výstup.