Excel VBA VarType funkcija
VBA VARTYPE nozīmē “Mainīgais tips”. Šī funkcija palīdz mums noteikt datu tipu, kas piešķirts konkrētajam mainīgajam, vai ar vienkāršu vārdu mēs varam teikt, ka tas atrod, kāda veida vērtība mainīgajam tiek saglabāta vai piešķirta.
Sintakse
VarName: Mums vienkārši jānorāda mainīgā nosaukums, lai atrastu datus, kas glabājas piegādātajā mainīgā nosaukumā.
Tātad, tas izmanto mainīgā nosaukumu kā sintaksi vai argumentu, un izvadē tas atgriež mainīgajam piešķirto datu tipu vai mainīgajā saglabāto datu veidu.
Tātad, ja jūs kādreiz esat domājis, kā atrast mainīgā mainīgā tipa vai veida datus, tad šeit mums ir VBA funkcija “VarType”.
Piemēri
1. piemērs
VBA rakstot kodu, mēs parasti deklarējam mainīgos un piešķiram tiem datu tipu. Piemēram, apskatiet zemāk redzamo VBA kodu.
Kods:
Sub VarType_Example () Dim MyVar As String MyVar = "Hello" End Sub
Iepriekš minētajā piemērā mainīgais ir deklarēts kā “String”, un šai virknei vērtība ir piešķirta kā “Hello”.
Šis ir vienkāršs gadījums, taču ir iespējams arī deklarēt mainīgos, nepiešķirot tiem mainīgos, tāpēc šādos gadījumos mums palīdz funkcija VarType.
Kods:
Sub VarType_Example () Dim MyVar MyVar = "Labdien" Beigas Sub
Iepriekš minētajā kodā mēs neesam piešķīruši nevienu datu tipu, bet uzreiz piešķiram vērtību kā “Sveiki”, tāpēc, izmantojot funkciju VarType, mēs varam atrast mainīgā datu tipu.
Atveriet MSGBOX VBA kodēšanā iepriekš minētajā kodā.
Pēc tam atveriet funkciju VarType.
Tagad kā funkcijas VARTYPE argumentu ievadiet mainīgā nosaukumu.
Kods:
Sub VarType_Example () Dim MyVar MyVar = "Labdien" MsgBox VarType (MyVar) Beigas Sub
Tagad palaidiet kodu un uzziniet, ko mēs saņemam ziņojumu lodziņā.
Rezultāts ir 8, jo VBA katram mainīgo datu tipam ir noteikti kodi, tāpēc zemāk ir detalizēts saraksts ar jums.
| Vērtība | Pastāvīgs | Apraksts | ||
| 0 | vbTukšs | Mainīgais vēl nav inicializēts | ||
| 1 | vbNull | Nav piešķirti nederīgi dati | ||
| 2 | vbInteger | Mainīgā vērtība ir “Integer” datu tips | ||
| 3 | vbGarš | Mainīgā vērtība ir “Long” datu tips | ||
| 4 | vbViens | Mainīgā vērtība ir “Single” datu tips | ||
| 5 | vbDouble | Mainīgā vērtība ir “Double” datu tips | ||
| 6 | vbValūta | Mainīgā vērtība ir datu tips “Valūta” | ||
| 7 | vbDate | Mainīgā vērtība ir “Datums” datu tips | ||
| 8 | vbString | Mainīgā vērtība ir “String” datu tips | ||
| 9 | vbObject | Mainīgā vērtība ir “Object” datu tips | ||
| 10 | vbError | Mainīgā vērtība ir Error Value | ||
| 11 | vbBoolean | Mainīgā vērtība ir “Būla” datu tips | ||
| 12 | vbVariant | Mainīgā vērtība ir “Variant” datu tips (izmanto tikai ar variantu masīviem) | ||
| 13 | vbDataObject | Mainīgā vērtība ir datu piekļuves objekts | ||
| 14 | vbDecimāls | Mainīgā vērtība ir “Decimāls” datu tips | ||
| 17 | vbByte | Mainīgā vērtība ir “Byte” datu tips | ||
| 20 | vbLongLong | Mainīgā vērtība ir “LONG LONG” datu tips (derīgs tikai 64 bitu platformās) | ||
| 36 | vbUserDefinedType | Mainīgā vērtība ir “Lietotāja definēts” datu tips | ||
| 8192 | vbArray | Mainīgā vērtība ir Masīvs. |
Labi, tagad mūsu kods ir mainījis mainīgā datu tipu kā 8, ti, mainīgā nosaukums “MyVar” satur datu tipu “String”.
2. piemērs
Tagad skatieties zemāk esošo kodu.
Kods:
Sub VarType_Example2 () Dim MyVar Set MyVar = ThisWorkbook MsgBox VarType (MyVar) End Sub
Palaidīsim šo kodu un redzēsim, kāds ir rezultāts.
Rezultāts ir 9, ti, mainīgais saturēja datu tipu “Object”. Jā, tas ir pareizi, jo mainīgajam “MyVar” mēs esam iestatījuši darbgrāmatas atsauci “Šī darbgrāmata”.
3. piemērs
Tagad skatieties zemāk esošo kodu.
Kods:
Sub VarType_Example3 () Dim MyVar MyVar = 32500 MsgBox VarType (MyVar) Beigas Sub
Tas atgriezīs rezultātu kā 2.
Tā kā mainīgajam piešķirtais skaitlis 32500 ir vērtība “Integer”.
Tagad es mainīšu vērtību uz 40000 un redzēšu rezultātu.
Kods:
Sub VarType_Example4 () Dim MyVar MyVar = 40000 MsgBox VarType (MyVar) Beigas Sub
Tas dos rezultātu kā 3.
Tā kā Integer vērtība beidzas ar 32767, tad jebkas virs tā tiks uzskatīts par VBA LONG datu tipu.
Tagad es numuru pievienošu pēdiņās.
Kods:
Sub VarType_Example5 () Dim MyVar MyVar = "40000" MsgBox VarType (MyVar) Beigas Sub
Palaidiet kodu un skatiet rezultātu.
Rezultāts tika iegūts kā 8, ti, virknes datu tips.
Tas ir tāpēc, ka viss, kas tiek sniegts iekavās, tiks uzskatīts par virknes mainīgo.
Atceramās lietas
- VARTYPE nozīmē “Mainīgais tips”.
- Datu tipu attēlo unikāli skaitļi, tāpēc atsaucieties uz tabulu, lai saprastu, kurš skaitlis norāda kādu mainīgo datu tipu.
