Funkcija Excel VBA VarType
VBA VARTYPE znači „tip varijable“. Ova nam funkcija pomaže identificirati tip podataka koji je dodijeljen određenoj varijabli, ili jednostavnom riječju možemo reći da pronalazi vrstu vrijednosti koja je pohranjena ili dodijeljena varijabli.
Sintaksa
VarName: Samo trebamo dostaviti ime varijable kako bismo pronašli podatke pohranjene u isporučenom imenu varijable.
Dakle, naziv varijable uzima kao sintaksu ili argument, a u izlazu vraća tip podataka dodijeljen varijabli ili vrstu podataka pohranjenih u varijabli.
Dakle, ako ste se ikad pitali kako pronaći tip podataka varijable ili vrstu podataka dodijeljenu varijabli, onda ovdje imamo VBA funkciju "VarType".
Primjeri
Primjer # 1
Tijekom pisanja koda u VBA obično deklariramo varijable i dodijeljujemo im tip podataka. Na primjer, pogledajte donji VBA kod.
Kodirati:
Sub VarType_Example () Priguši MyVar kao niz MyVar = "Hello" End Sub
U gornjem primjeru varijablu smo proglasili "String", a za ovaj smo niz dodijelili vrijednost kao "Hello".
Ovo je jednostavan slučaj, ali također je moguće deklarirati varijable bez da im dodijelite varijable, pa nam u takvim slučajevima pomaže funkcija VarType.
Kodirati:
Sub VarType_Example () Dim MyVar MyVar = "Pozdrav" Kraj Sub
U gornjem kodu nismo dodijelili nijedan tip podataka, već smo odmah dodijelili vrijednost kao "Zdravo", tako da pomoću funkcije VarType možemo pronaći tip podataka varijable.
Otvorite MSGBOX u VBA kodiranju u gornjem kodu.
Zatim otvorite funkciju VarType.
Sada unesite ime varijable kao argument funkcije VARTYPE.
Kodirati:
Sub VarType_Example () Dim MyVar MyVar = "Pozdrav" MsgBox VarType (MyVar) Kraj Sub
Sada pokrenite kod i pogledajte što ćemo dobiti u okviru za poruku.
Rezultat smo dobili kao 8, jer VBA ima određene kodove za svaku vrstu varijabilnih vrsta podataka, pa je u nastavku detaljan popis za vas.
| Vrijednost | Konstantno | Opis | ||
| 0 | vbEmpty | Varijabla još nije inicijalizirana | ||
| 1 | vbNull | Dodijeljeni su nevaljani podaci | ||
| 2 | vbInteger | Vrijednost varijable je vrsta podataka "Integer" | ||
| 3 | vbLong | Vrijednost varijable je vrsta podataka "Long" | ||
| 4 | vbSingle | Vrijednost varijable je "Single" tip podataka | ||
| 5 | vbDvostruko | Vrijednost varijable je vrsta podataka "Double" | ||
| 6 | vbCurrency | Vrijednost varijable je vrsta podataka "Valuta" | ||
| 7 | vbDate | Vrijednost varijable je tip podataka „Datum“ | ||
| 8 | vbString | Vrijednost varijable je vrsta podataka "String" | ||
| 9 | vbObject | Vrijednost varijable je tip podataka "Objekt" | ||
| 10 | vbError | Vrijednost varijable je vrijednost pogreške | ||
| 11 | vbBoolean | Vrijednost varijable je "logički" tip podataka | ||
| 12 | vbVariant | Vrijednost varijable je tip podataka "Variant" (koristi se samo s nizovima varijanti) | ||
| 13 | vbDataObject | Vrijednost varijable je objekt pristupa podacima | ||
| 14 | vbDecimalni | Vrijednost varijable je "decimalni" tip podataka | ||
| 17 | vbByte | Vrijednost varijable je vrsta podataka "Byte" | ||
| 20 | vbLongLong | Vrijednost varijable je vrsta podataka „LONG LONG“ (vrijedi samo na 64-bitnim platformama) | ||
| 36 | vbUserDefinedType | Vrijednost varijable je "Korisnički definiran" tip podataka | ||
| 8192 | vbArray | Vrijednost varijable je Array. |
Ok, sada je naš kod promijenio tip podataka varijable kao 8, tj. Naziv varijable "MyVar" sadrži tip podataka "String".
Primjer # 2
Sada pogledajte kod u nastavku.
Kodirati:
Sub VarType_Example2 () Dim MyVar Set MyVar = ThisWorkbook MsgBox VarType (MyVar) End Sub
Pokrenimo ovaj kod i vidimo kakav je rezultat.
Rezultat je 9, tj. Varijabla sadrži tip podataka „Objekt“. Da, to je točno jer smo za varijablu "MyVar" postavili referencu radne knjige "Ova radna knjiga".
Primjer # 3
Sada pogledajte kod u nastavku.
Kodirati:
Sub VarType_Example3 () Dim MyVar MyVar = 32500 MsgBox VarType (MyVar) Kraj Sub
Ovo će vratiti rezultat kao 2.
Budući da je broj 32500, koji je dodijeljen varijabli, vrijednost "Integer".
Sada ću promijeniti vrijednost na 40000 i vidjeti rezultat.
Kodirati:
Sub VarType_Example4 () Dim MyVar MyVar = 40000 MsgBox VarType (MyVar) Kraj Sub
Rezultat će biti 3.
Budući da vrijednost Integer završava na 32767, pa će se sve iznad toga tretirati kao VBA LONG tip podataka.
Sada ću broj dodati u dvostruke navodnike.
Kodirati:
Sub VarType_Example5 () Dim MyVar MyVar = "40000" MsgBox VarType (MyVar) Kraj Sub
Pokrenite kod i pogledajte rezultat.
Rezultat smo dobili kao 8, tj. Vrsta podataka String.
To je zato što će se sve što je dato u zagradi tretirati kao varijablu String.
Stvari koje treba zapamtiti
- VARTYPE je kratica za „Variable Type“.
- Tip podataka predstavljen je jedinstvenim brojevima, pa pogledajte tablicu da biste razumjeli koji broj predstavlja koji varijabilni tip podataka.
