Funkcia Excel VBA VarType
VBA VARTYPE znamená „Variabilný typ“. Táto funkcia nám pomáha identifikovať dátový typ priradený konkrétnej premennej alebo jednoduchým slovom môžeme povedať, že zistí, aký druh hodnoty je premennej uložený alebo priradený.
Syntax
VarName: Potrebujeme iba zadať názov premennej, aby sme našli údaje uložené v zadanom názve premennej.
Názov premennej teda berie ako syntax alebo argument a na výstupe vráti údajový typ priradený premennej alebo druh údajov uložených v premennej.
Ak ste sa teda niekedy pýtali, ako nájsť premenný údajový typ alebo druh údajov priradených k premennej, potom tu máme funkciu VBA „VarType“.
Príklady
Príklad č
Vo VBA pri písaní kódu zvyčajne deklarujeme premenné a priraďujeme im dátový typ. Napríklad sa pozrite na nižšie uvedený kód VBA.
Kód:
Sub VarType_Example () Dim MyVar ako reťazec MyVar = "Dobrý deň" End Sub
Vo vyššie uvedenom príklade sme premennú deklarovali ako „String“ a pre tento reťazec sme priradili hodnotu ako „Hello“.
Toto je priamy prípad, ale je tiež možné deklarovať premenné bez toho, aby sme im premenné priraďovali, takže v takýchto prípadoch nám pomáha funkcia VarType.
Kód:
Sub VarType_Example () Dim MyVar MyVar = "Ahoj" Koniec Sub
Vo vyššie uvedenom kóde sme nepriradili žiadny údajový typ, ale rovno sme mu priradili hodnotu „Hello“, takže pomocou funkcie VarType nájdeme dátový typ premennej.
Vo vyššie uvedenom kóde otvorte program MSGBOX v kódovaní VBA.
Potom otvorte funkciu VarType.
Teraz zadajte názov premennej ako argument funkcie VARTYPE.
Kód:
Sub VarType_Example () Dim MyVar MyVar = "Dobrý deň" MsgBox VarType (MyVar) End Sub
Teraz spustite kód a v okne správy sa pozrite, čo dostaneme.
Výsledok sme dostali ako 8, pretože VBA má určité kódy pre každý druh variabilného dátového typu, takže nižšie uvádzame podrobný zoznam.
| Hodnota | Neustále | Popis | ||
| 0 | vbEmpty | Premenná ešte nie je inicializovaná | ||
| 1 | vbNull | Nie sú priradené platné údaje | ||
| 2 | vbInteger | Hodnota premennej je dátový typ „Integer“ | ||
| 3 | vbLong | Hodnota premennej je dátový typ „Long“ | ||
| 4 | vbSingle | Hodnota premennej je dátový typ „Single“ | ||
| 5 | vbDouble | Hodnota premennej je dátový typ „Double“ | ||
| 6 | vbMena | Hodnota premennej je dátový typ „Mena“ | ||
| 7 | vbDate | Hodnota premennej je dátový typ „Date“ | ||
| 8 | vbString | Hodnota premennej je dátový typ „String“ | ||
| 9 | vbObject | Hodnota premennej je dátový typ „Objekt“ | ||
| 10 | vbError | Hodnota premennej je chybová hodnota | ||
| 11 | vbBoolean | Hodnota premennej je dátový typ „Boolean“ | ||
| 12 | vbVariant | Hodnota premennej je dátový typ „Variant“ (používa sa iba s poľami variantov). | ||
| 13 | vbDataObject | Hodnota premennej je Data Access Object | ||
| 14 | vbDecimal | Hodnota premennej je dátový typ „Decimal“ | ||
| 17 | vbByte | Hodnota premennej je dátový typ „Byte“ | ||
| 20 | vbLongLong | Hodnota premennej je dátový typ „LONG LONG“ (platí iba pre 64-bitové platformy) | ||
| 36 | vbUserDefinedType | Hodnota premennej je dátový typ „Definovaný používateľom“ | ||
| 8192 | vbArray | Hodnota premennej je Array. |
Ok, teraz náš kód preladil dátový typ premennej na 8, tj. Názov premennej „MyVar“ obsahuje dátový typ „String“.
Príklad č
Teraz sa pozrite na nižšie uvedený kód.
Kód:
Sub VarType_Example2 () Dim MyVar Set MyVar = ThisWorkbook MsgBox VarType (MyVar) End Sub
Spustíme tento kód a uvidíme, aký bude výsledok.
Výsledkom je 9, tj. Premenná obsahujúca dátový typ „Objekt“. Áno, je to správne, pretože pre premennú „MyVar“ sme nastavili odkaz na zošit „Tento zošit“.
Príklad č
Teraz sa pozrite na nižšie uvedený kód.
Kód:
Sub VarType_Example3 () Dim MyVar MyVar = 32 500 MsgBox VarType (MyVar) End Sub
Výsledok sa vráti ako 2.
Pretože číslo 32500, ktoré je priradené k premennej, je hodnota „Celé číslo“.
Teraz zmením hodnotu na 40000 a uvidím výsledok.
Kód:
Sub VarType_Example4 () Dim MyVar MyVar = 40000 MsgBox VarType (MyVar) End Sub
Výsledkom bude výsledok 3.
Pretože celočíselná hodnota končí na 32767, bude sa s čímkoľvek vyššie uvedeným zaobchádzať ako s dátovým typom VBA LONG.
Teraz uvediem číslo v dvojitých úvodzovkách.
Kód:
Sub VarType_Example5 () Dim MyVar MyVar = "40000" MsgBox VarType (MyVar) End Sub
Spustite kód a uvidíte výsledok.
Výsledok sme dostali ako 8, teda dátový typ String.
Je to tak preto, lebo všetko, čo sa dodáva v zátvorke, sa bude považovať za premennú typu String.
Na čo treba pamätať
- VARTYPE znamená „Variabilný typ“.
- Typ údajov je reprezentovaný jedinečnými číslami, preto si pozrite tabuľku, aby ste pochopili, ktoré číslo predstavuje ktorý premenný typ údajov.
