Funcția Excel VBA VarType
VBA VARTYPE înseamnă „tip variabil”. Această funcție ne ajută să identificăm tipul de date atribuit variabilei specifice sau, într-un cuvânt simplu, putem spune că găsește ce fel de valoare este stocată sau atribuită variabilei.
Sintaxă
VarName: Trebuie doar să furnizăm numele variabilei pentru a găsi datele stocate în numele variabilei furnizate.
Deci, ia numele variabilei ca sintaxă sau argument și, în ieșire, returnează tipul de date atribuit variabilei sau tipul de date stocate în variabilă.
Deci, dacă v-ați întrebat vreodată cum să găsiți tipul de date variabilă sau tipul de date atribuite variabilei, atunci aici avem o funcție VBA „VarType”.
Exemple
Exemplul nr. 1
În VBA, în timp ce scriem codul, de obicei declarăm variabile și le atribuim un tip de date. De exemplu, uitați-vă la codul VBA de mai jos.
Cod:
Sub VarType_Example () Dim MyVar As String MyVar = "Hello" End Sub
În exemplul de mai sus, am declarat variabila ca „Șir”, iar pentru acest șir am atribuit valoarea „Bună ziua”.
Acesta este un caz simplu, dar este, de asemenea, posibil să declarați variabilele fără a le atribui variabilele, astfel încât în astfel de cazuri, funcția VarType ne ajută.
Cod:
Sub VarType_Example () Dim MyVar MyVar = "Hello" End Sub
În codul de mai sus, nu am atribuit niciun tip de date, dar imediat i-am atribuit valoarea „Bună ziua”, astfel încât, folosind funcția VarType, putem găsi tipul de date al variabilei.
Deschideți MSGBOX în codificarea VBA în codul de mai sus.
Apoi deschideți funcția VarType.
Acum introduceți numele variabilei ca argument al funcției VARTYPE.
Cod:
Sub VarType_Example () Dim MyVar MyVar = "Hello" MsgBox VarType (MyVar) End Sub
Acum rulați codul și vedeți ce primim în caseta de mesaje.
Am obținut rezultatul ca 8, deoarece VBA are anumite coduri pentru fiecare tip de tip variabil de date, deci mai jos este lista detaliată pentru dvs.
| Valoare | Constant | Descriere | ||
| 0 | vbGol | Variabila nu este încă inițializată | ||
| 1 | vbNull | Nu sunt atribuite date nevalide | ||
| 2 | vbInteger | Valoarea variabilă este tipul de date „Întreg” | ||
| 3 | vbLung | Valoarea variabilă este tipul de date „lung” | ||
| 4 | vbSingle | Valoarea variabilă este tipul de date „unic” | ||
| 5 | vbDouble | Valoarea variabilă este tipul de date „Dublu” | ||
| 6 | vbCurrency | Valoarea variabilă este tipul de date „Monedă” | ||
| 7 | vbDate | Valoarea variabilă este tipul de date „Data” | ||
| 8 | vbString | Valoarea variabilă este tipul de date „Șir” | ||
| 9 | vbObject | Valoarea variabilă este tipul de date „Obiect” | ||
| 10 | vbError | Valoarea variabilă este Value Value | ||
| 11 | vbBoolean | Valoarea variabilă este tipul de date „boolean” | ||
| 12 | vbVariant | Valoarea variabilă este tipul de date „Variantă” (utilizată numai cu tablouri de variante) | ||
| 13 | vbDataObject | Valoarea variabilă este obiectul de acces la date | ||
| 14 | vbDecimal | Valoarea variabilă este tipul de date „Zecimal” | ||
| 17 | vbByte | Valoarea variabilă este tipul de date „Byte” | ||
| 20 | vbLongLong | Valoarea variabilă este tipul de date „LONG LONG” (valabil numai pe platformele pe 64 de biți) | ||
| 36 | vbUserDefinedType | Valoarea variabilă este tipul de date „Definit de utilizator” | ||
| 8192 | vbArray | Valoarea variabilă este Array. |
Ok, acum codul nostru a reglat tipul de date variabilă ca 8, adică numele variabilei „MyVar” conține tipul de date „String”.
Exemplul nr. 2
Acum, uitați-vă la codul de mai jos.
Cod:
Sub VarType_Example2 () Dim MyVar Set MyVar = ThisWorkbook MsgBox VarType (MyVar) End Sub
Să rulăm acest cod și să vedem care este rezultatul.
Rezultatul este 9, adică variabila conținea tipul de date „Obiect”. Da, acest lucru este corect deoarece, pentru variabila „MyVar”, am setat referința din registrul de lucru „Acest registru de lucru”.
Exemplul nr. 3
Acum, uitați-vă la codul de mai jos.
Cod:
Sub VarType_Example3 () Dim MyVar MyVar = 32500 MsgBox VarType (MyVar) End Sub
Aceasta va întoarce rezultatul ca 2.
Deoarece numărul 32500, care este atribuit variabilei, este o valoare „Întreg”.
Acum voi schimba valoarea la 40000 și voi vedea rezultatul.
Cod:
Sub VarType_Example4 () Dim MyVar MyVar = 40000 MsgBox VarType (MyVar) End Sub
Acest lucru va da rezultatul ca 3.
Deoarece valoarea întregului se termină la 32767, deci orice altceva de mai sus va fi tratat ca un tip de date VBA LONG.
Acum voi înscrie numărul în ghilimele duble.
Cod:
Sub VarType_Example5 () Dim MyVar MyVar = "40000" MsgBox VarType (MyVar) End Sub
Rulați codul și vedeți rezultatul.
Am obținut rezultatul ca 8, adică tip de date șir.
Acest lucru se datorează faptului că orice furnizat în paranteză va fi tratat ca o variabilă String.
Lucruri de amintit
- VARTYPE înseamnă „Tip variabil”.
- Tipul de date este reprezentat de numere unice, deci consultați tabelul pentru a înțelege ce număr reprezintă tipul de date variabil.
