Funktsioon VBA VARTYPE | Kuidas leida muutuja andmetüüpi?
Exceli VBA varType funktsioon
VBA VARTYPE tähendab muutuja tüüpi. See funktsioon aitab meil tuvastada konkreetsele muutujale omistatud andmetüüpi või lihtsa sõnaga öelda, et see leiab, milline väärtus on muutujale salvestatud või omistatud.
Süntaks
VarName: Pakutava muutuja nimesse salvestatud andmete leidmiseks peame lihtsalt esitama muutuja nime.
Niisiis võtab see muutuja nime süntaksina või argumendina ja väljundis tagastab muutujale omistatud andmetüübi või muutusesse salvestatud andmete tüübi.
Niisiis, kui olete kunagi mõelnud, kuidas leida muutuja andmetüüp või sellele omistatud andmete liik, siis siin on meil VBA funktsioon „VarType”.
Näited
Selle VBA VARTYPE Exceli malli saate alla laadida siit - VBA VARTYPE Exceli mallNäide 1
VBA-s koodi kirjutamise ajal deklareerime tavaliselt muutuja ja määrame neile andmetüübi. Näite saamiseks vaadake allpool olevat VBA-koodi.
Kood:
Sub VarType_Example () Dim MyVar stringina MyVar = "Tere" End Sub
Ülalolevas näites oleme deklareerinud muutuja väärtuseks „String” ja selle stringi jaoks oleme määranud väärtuse „Tere”.
See on sirgjooneline juhtum, kuid muutujaid on võimalik ka deklareerida ilma neile muutujaid määramata, nii et sellistel juhtudel aitab meid funktsioon VarType.
Kood:
Sub VarType_Example () Dim MyVar MyVar = "Tere" End Sub
Eespool toodud koodis pole me määranud ühtegi andmetüüpi, vaid määrasime kohe väärtuse “Tere”, nii et funktsiooni VarType kasutades leiame muutuja andmetüübi.
Avage ülaltoodud koodis MSGBOX VBA kodeeringus.
Seejärel avage funktsioon VarType.
Nüüd sisestage muutuja nimi funktsiooni VARTYPE argumendiks.
Kood:
Sub VarType_Example () Dim MyVar MyVar = "Tere" MsgBox VarType (MyVar) End Sub
Nüüd käivitage kood ja vaadake, mida me saame sõnumikastist.
Tulemuseks saime 8, kuna VBA-l on teatud tüüpi muutujate andmetüüpide jaoks kindlad koodid, nii et allpool on teie jaoks üksikasjalik loend.
Väärtus | Pidev | Kirjeldus | ||
0 | vbTühi | Muutuja pole veel lähtestatud | ||
1 | vbNull | Määratud pole kehtivad andmed | ||
2 | vbTäisarv | Muutuja väärtus on andmetüüp „Tervik” | ||
3 | vbPikk | Muutuja väärtus on „pikk” andmetüüp | ||
4 | vbÜksik | Muutuja väärtus on „üksik” andmetüüp | ||
5 | vbDouble | Muutuja väärtus on andmetüüp „Double” | ||
6 | vbValuuta | Muutuja väärtus on andmetüüp „Valuuta” | ||
7 | vbDate | Muutuja väärtus on andmetüüp „Kuupäev” | ||
8 | vbString | Muutuja väärtus on andmetüüp „String” | ||
9 | vbObject | Muutuja väärtus on andmetüüp „Object” | ||
10 | vbViga | Muutuja väärtus on Error Value | ||
11 | vbBoolean | Muutuja väärtus on andmetüüp „Boolean” | ||
12 | vbMuutuja | Muutuja väärtus on andmetüüp „Variant” (kasutatakse ainult variantide massiividega) | ||
13 | vbDataObject | Muutuja väärtus on Data Access Object | ||
14 | vbKümnendkoht | Muutuja väärtus on andmetüüp „Kümnendkoht“ | ||
17 | vbByte | Muutuja väärtus on andmetüüp „Bait“ | ||
20 | vbPikk Pikk | Muutuja väärtus on andmetüüp „LONG LONG” (kehtib ainult 64-bitistel platvormidel) | ||
36 | vbUserDefinedType | Muutuja väärtus on andmetüüp „Kasutaja määratud” | ||
8192 | vbArray | Muutuja väärtus on Array |
Ok, nüüd on meie kood muutuja andmetüübi uuesti häälestanud, st muutuja nimi „MyVar“ sisaldab andmetüüpi „String“.
Näide 2
Nüüd vaadake allolevat koodi.
Kood:
VarType_Example2 () Dim MyVar Set MyVar = ThisWorkbook MsgBox VarType (MyVar) End Sub
Käivitame selle koodi ja vaatame, mis on tulemus.
Tulemuseks on 9, st muutuja sisaldas andmetüüpi “Object”. Jah, see on õige, kuna muutuja "MyVar" jaoks oleme määranud töövihiku viite "See töövihik".
Näide # 3
Nüüd vaadake allolevat koodi.
Kood:
VarType_Example3 () Dim MyVar MyVar = 32500 MsgBox VarType (MyVar) End Sub
See annab tulemuseks 2.
Kuna muutujale määratud number 32500 on „täisarv“.
Nüüd muudan väärtuse väärtuseks 40000 ja näen tulemust.
Kood:
VarType_Example4 () Dim MyVar MyVar = 40000 MsgBox VarType (MyVar) End Sub
See annab tulemuseks 3.
Kuna täisarvu väärtus on 32767, käsitletakse kõike seda kõrgemat VBA LONG andmetüübina.
Nüüd lisan numbri topelt jutumärkidesse.
Kood:
Sub VarType_Example5 () Dim MyVar MyVar = "40000" MsgBox VarType (MyVar) End Sub
Käivitage kood ja vaadake tulemust.
Tulemuseks saime 8 st stringi andmetüübiks.
Selle põhjuseks on see, et kõike, mida sulgudes esitatakse, käsitletakse stringimuutujana.
Asjad, mida meeles pidada
- VARTYPE tähistab muutuja tüüpi.
- Andmetüüpi tähistatakse kordumatute numbritega, nii et tabelist saate aru, milline number mis muutuja andmetüüpi tähistab.