Ez a cikk bemutatja a VarType függvény használatát a VBA -ban.
A VarType változótípust jelent. A VarType függvénynek megadhatjuk a változó nevét, és egy egész számot ad vissza, amely a változóban tárolt adatok típusát ábrázolja a VBA állandók listája szerint.
Egy Variant Variable használata a VarType megkereséséhez
Változónak deklarálhatjuk a változót. Ez lehetővé teszi, hogy bármilyen típusú engedélyezett adatot tároljunk benne. Ezután kitölthetjük ezt a változót, és a VarType függvény segítségével megnézhetjük, hogy milyen típusú adatok vannak a változóban.
Például:
| 12345 | Sub TestVarType ()Dim MyVariable mint változatMyVariable = "Hello World"MsgBox "A változó típusa" & VarType (MyVariable)End Sub |
Ez a következő üzenetmezőt adja vissza:
A 8 érték tehát visszatér. Ez egy Excel konstansban, amely meghatározza a változóban tárolt adatok típusát.
Ez az állandó érték megfelel az alábbi táblázatnak:
| Állandó | Érték | Leírás |
|---|---|---|
| vbÜres | 0 | Üres (inicializálatlan) |
| vbNull | 1 | Null (nincs érvényes adat) |
| vbInteger | 2 | Egész szám |
| vbHosszú | 3 | Hosszú egész szám |
| vbSingle | 4 | Egypontos lebegőpontos szám |
| vbKettős | 5 | Kettős pontosságú lebegőpontos szám |
| vbPénznem | 6 | Pénznem értéke |
| vbDátum | 7 | Dátum értéke |
| vbString | 8 | Húr |
| vbObject | 9 | Tárgy |
| vbHiba | 10 | Hibaérték |
| vbBoolean | 11 | Logikai érték |
| vbVáltozatos | 12 | Változat (csak változatos tömbökkel használható) |
| vbDataObject | 13 | Adathozzáférési objektum |
| vbTizedes | 14 | Tizedes érték |
| vbByte | 17 | Bájt értéke |
| vbLongLong | 20 | Hosszú egész szám (csak 64 bites platformokon érvényes) |
| vbUserDefinedType | 36 | A felhasználó által definiált típusokat tartalmazó változatok |
| vbArray | 8192 | Tömb (mindig hozzáadódik egy másik állandóhoz, amikor ez a függvény visszaküldi) |
Megpróbálhatunk egy másik példát:
| 12345 | Sub TestVarType ()Dim MyVariable mint változatSaját változó = 32760MsgBox "A változó típusa" & VarType (MyVariable)End Sub |
Ezúttal az üzenetdoboz 2 -t ad vissza, mivel a változóban tárolt adattípus az Integer.
Ha azonban 32780 -ra módosítjuk az értéket, akkor az értékvisszaadás 3 lesz - Hosszú egész, mint egész szám adattípus maximális értéke 32767; utána hosszú egész szám.
Ha még egyszer módosítanánk a kódot:
| 12345 | Sub TestVarType ()Dim MyVariable mint változatMyVariable = 32760.52MsgBox "A változó típusa" & VarType (MyVariable)End Sub |
Most 5 értéket kapunk vissza - az adattípus kettős a tizedesjegyek miatt.
Ha a változó értékét idézőjelbe tennénk, akkor ismét egy 8 -as értéket adunk vissza, mivel az idézőjelekben található értékeket karakterlánc -értékként tároljuk.
| 12345 | Sub TestVarType ()Dim MyVariable mint változatMyVariable = "32760.52"MsgBox "A változó típusa" & VarType (MyVariable)End Sub |
