seychellesartprojects.org

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, mainīgā nosaukums tiek izmantots kā sintakse vai arguments, un izvadē tas atgriež mainīgajam piešķirto datu tipu vai mainīgajā saglabāto datu veidu.

Tātad, ja kādreiz esat domājis, kā atrast mainīgā mainīgā tipa tipu vai mainīgajam piešķirto datu veidu, šeit mums ir VBA funkcija “VarType”.

Piemēri

Šo VBA VARTYPE Excel veidni varat lejupielādēt šeit - VBA VARTYPE Excel veidne

1. piemērs

VBA rakstot kodu, mēs parasti deklarējam mainīgo un piešķiram tiem datu tipu. Piemēru skatiet zemāk redzamajā VBA kodā.

Kods:

 Sub VarType_Example () Dim MyVar As String MyVar = "Hello" End Sub 

Iepriekš minētajā piemērā mēs esam deklarējuši mainīgo kā “String”, un šai virknei vērtību esam piešķīruši kā “Hello”.

Šis ir tiešs gadījums, bet 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ā “Labdien”, 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 skatiet, 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 atkārtoti noskaņojis mainīgo datu tipu kā 8, ti, mainīgā nosaukums “MyVar” satur “String” datu tipu.

2. piemērs

Tagad apskatiet 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 apskatiet 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 “Integer” vērtība.

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 veidu attēlo unikāli skaitļi, tāpēc atsaucieties uz tabulu, lai saprastu, kurš skaitlis apzīmē mainīgo datu tipu.