VBA operatoriai „Excel VBA“ operatorių sąrašas (pavyzdžiai)

„Excel VBA“ operatoriai

Be VBA operatoriai naudojami patikrinti, ar vienas skaičius yra didesnis už kitą ar mažiau nei kitos arba lygus kitą numerį ir nėra lygus, taip pat. Metodas yra panašus į operatorių naudojimą, nes mes naudojame „Excel“, pvz., A> B naudoja palyginimo operatorių.

Nesvarbu, kokie geri mes esame ar kiek mokame savo darbą. Jei mes tinkamai nepadarysime pagrindų, viskas bus sumaišta. Pirma, jei neišmokstame pagrindų teisingai, tada negalime pereiti į kitą lygį, nesvarbu, ar tai būtų kokia nors profesija. Priežastis, kodėl taip verčiuosi dėl pagrindų, nes šiandieniniame straipsnyje mes jums parodysime vieną iš pagrindinių sąvokų „VBA operatoriai“.

Operatoriai yra bet kokio skaičiavimo esmė. Tai ženklai, kuriais mes palyginame vieną dalyką su kitu. Esu įsitikinęs, kad šią logiką privalote naudoti savo kasdienėje darbo vietoje.

Matematinių operatorių sąrašas

Žemiau pateikiamas matematinių operatorių sąrašas, kurį mes reguliariai naudojame.

Aukščiau yra matematiniai operatoriai, kurie yra bendri visiems. Mes taip pat turime palyginimo operatorius. Žemiau pateikiamas tų sąrašas.

VBA palyginimo operatorių sąrašas

  • Lygus ženklas (=)
  • Didesnis nei ženklas (>)
  • Didesnis nei arba lygus ženklui (> =)
  • Mažiau nei ženklas (<)
  • Nelygu ženklui ()

Aptarkime šiuos operatorius išsamiai.

Lygus ženklas (=)

Šis ženklas naudojamas norint palyginti, ar vienas dalykas yra lygus kitam. Šio operatoriaus ženklo rezultatas yra TRUE arba FALSE. Jei vienas dalykas yra lygus kitam, tada mes gausime TIKRĄ ar dar KLAIDINGĄ.

Žemiau pateikiamas VBA kodas, norint suprasti operatoriaus „ Equal“ (=) naudojimą .

Kodas:

Sub Equal_Operator () Dim Val1 kaip eilutė Dim Val2 kaip eilutė Val1 = 25 Val2 = 25 Jei Val1 = Val2 Tada MsgBox "Abi yra tos pačios, o rezultatas yra TIKRA" Kitos MsgBox "Abi nėra tos pačios ir rezultatas yra NETIESA" Pabaiga jei pabaiga Sub

Tai grąžins rezultatą kaip TRUE, nes kintamųjų reikšmės „Val1“ ir „Val2“ yra vienodos.

Didesnis nei ženklas (>)

Šis ženklas patikrina, ar vienas skaičius yra didesnis už kitą. Tai taip pat yra logiškas VBA operatorius, kurio rezultatas yra TRUE arba FALSE.

Žemiau pateikiamas VBA kodas, norint suprasti operatoriaus „ Daugiau nei (>)“ naudojimą .

Kodas:

Sub Greater_Operator () Dim Val1 kaip eilutė Dim Val2 kaip eilutė Val1 = 25 Val2 = 20 Jei Val1> Val2 Tada MsgBox "Val1 yra didesnis nei val2, o rezultatas yra TRUE" Kita MsgBox "Val1 yra ne didesnė nei val2, o rezultatas yra NETIESA "Pabaiga, jei pabaiga

Ir rezultatas bus -

Didesnis nei arba lygus ženklui (> =)

Šis ženklas veikia lygiai taip pat, kaip ir anksčiau nurodytas operatorius „Greater Than“, tačiau patikrina, ar skaičius yra lygus, ar ne.

Žemiau pateikiamas VBA kodas, norint suprasti operatoriaus „ Daugiau nei“ arba „Lygus (> =“) naudojimą .

Kodas:

Sub Greater_Than_Equal_Operator () Dim Val1 kaip eilutė Dim Val2 As eilutė Val1 = 25 Val2 = 20 Jei Val1> = Val2 Tada MsgBox "Val1 yra didesnis nei val2, o rezultatas yra TRUE" Kita MsgBox "Val1 nėra didesnė už val2 ir rezultatas yra FALSE "Pabaiga, jei pabaiga

Dabar mes tiesiog pakeisime val2 sumą į 25 ir tada paleisime kodą.

Abu rezultatai pateikia TRUE, nes pritaikėme ženklą> =.

Mažiau nei ženklas (<)

Šis ženklas patikrina, ar vienas skaičius yra mažesnis nei kitas skaičius. Tai taip pat logiškas VBA operatorius, kurio rezultatas yra TRUE arba FALSE.

Žemiau pateikiamas VBA kodas, norint suprasti operatoriaus Mažiau nei (<) naudojimą .

Kodas:

Sub Less_Operator () Dim Val1 kaip eilutė Dim Val2 kaip eilutė Val1 = 25 Val2 = 20 Jei Val1 <Val2 Tada MsgBox "Val1 yra mažesnis nei val2, o rezultatas yra TIKRA" Kita MsgBox "Val1 yra ne mažesnė nei val2, o rezultatas yra NETIESA "Pabaiga, jei pabaiga

Tai grąžina FALSE, nes 25 yra ne mažiau kaip 20.

Nelygu ženklui ()

Tai nėra lygu ženklui, kai atvirkštinis operatorius pateikia atvirkštinius rezultatus. Jei vienas dalykas yra lygus kitam, jis grąžina NETIESA arba dar TIESA.

Žemiau pateikiamas kodas, norint suprasti operatoriaus „ VBA Not Equal“ () naudojimą.

Kodas:

Sub NotEqual_Operator () Dim Val1 kaip eilutė Dim Val2 kaip eilutė Val1 = 25 Val2 = 20 Jei Val1 Val2 Tada MsgBox "Val1 nėra lygus val2 ir rezultatas yra TIKRA" Kita MsgBox "Val1 yra lygi val2 ir rezultatas yra NETIESA" Pabaiga jei Pabaigos sub

Gausite tokią išvestį.

Įdomios straipsniai...