Declarație de tip VBA (exemplu) - Cum să declarați variabile cu tipul VBA?

Type este o declarație în VBA care este utilizată pentru a defini variabile similare cu funcția DIM, este utilizată la nivelul definit de utilizator unde avem una sau mai multe valori într-o variabilă, există două nomenclaturi pentru declarația de tip care este publică sau privată, totuși acestea sunt opționale de utilizat, dar numele variabilei și numele elementului sunt obligatorii.

Ce este declarația de tip în Excel VBA?

Declarația de tip VBA este utilizată pentru a defini variabilele sub un singur nume de grup cu diferite tipuri de date atribuite fiecărei variabile. Acest lucru ne ajută să grupăm mai multe variabile sub un singur obiect pentru a le utiliza sub numele de tip definit.

Prin declararea instrucțiunii Type, putem evita utilizarea modulelor de clasă în VBA. Nu are nevoie de module șir, deoarece poate fi încorporat în module deja existente, ceea ce ne poate economisi spațiu.

Într-unul din articolele anterioare, am discutat despre „VBA ENUM” pentru a grupa toate variabilele sub numele grupului unic.

De exemplu, dacă aveți un nume de grup numit „Mobile”, avem membri ai grupului precum „Redmi, Oppo, Vivo, Samsung, LG și etc …” Deci, declarația Enum o putem grupa împreună cu valorile lor respective.

Enum Mobiles

Redmi = 12000

Oppo = 18000

Vivo = 18000

Samsung = 25000

LG = 15000

Sfârșitul Enum

Astfel, am creat enumerări în acel articol. Problema cu declarația Enum, deoarece poate conține doar un tip de date LUNG. Pentru a grupa variabile cu diferite tipuri de date, putem folosi „Declarația TIP VBA”. În acest articol, vă vom arăta cum să construiți o instrucțiune Type în VBA. Citește mai departe…

Sintaxă

Înainte de a declara variabile folosind instrucțiunea Type, aruncați o privire la sintaxă:

Tastați numele grupului   (variabila 1) ca tip de date variabile   (variabila 2) ca tip de date variabile   (variabila 3) ca tip de date   variabile (variabila 4) ca tip de date   variabile (variabila 5) ca tip de date variabile tip  final

Aceste tipuri de instrucțiuni pot fi declarate atât în ​​modul, cât și în partea de sus a modulului, cum ar fi Variabilele noastre globale în VBA.

Tipul VBA poate conține variabile de obiect. Poate conține tablouri. Cu toate acestea, nu poate conține proceduri, funcții.

Tip Exemplu de declarație în VBA

Ok, să începem procesul de declarare a variabilelor cu instrucțiunea Type. Vom vedea același exemplu de declarare a mărcilor mobile, cum am folosit în VBA Enum.

Pasul 1: În partea de sus a modulului, începeți cuvântul „Tip” și dați un nume tipului de grup.

Cod:

Tastați MobileBrands End Type

Pasul 2: în mărcile mobile, care sunt lucrurile pe care le vedem de obicei. Vedem mai întâi Nume, deci declarăm variabila ca Nume ca Șir.

Cod:

Tastați numele MobileBrands ca tip de sfârșit de șir

Pasul 3: După nume, verificăm data lansării. Declarați variabila ca LaunchDate ca dată.

Cod:

Tastați MobileBrands Denumire ca șir LaunchDate Ca tip de dată de încheiere

Pasul 4: Următorul lucru este să verificăm capacitatea de stocare. Pentru a declara variabila ca stocare ca întreg.

Cod:

Tastați MobileBrands Denumire ca șir LaunchDate Ca dată de stocare ca tip de număr întreg

Pasul 5: Următorul lucru este să verificăm capacitatea RAM.

Cod:

Tastați MobileBrands Denumire ca șir de lansare Data ca dată de stocare ca RAM ca tip de sfârșit întreg

Pasul 6: În cele din urmă, verificăm prețul.

Cod:

Tastați MobileBrands Denumire ca șir de lansare Data ca dată Stocare ca RAM întreg Ca preț întreg ca tip final

Acum, în procedura secundară, declarând variabila ca Tip, Nume, adică MobileBrands, putem accesa toate aceste tipuri de date variabile.

Step 7: Create a subprocedure.

Code:

Sub Type_Example1() End Sub

Step 8: Now declare the variable “Mobile” as MobileBrnads.

Code:

Sub Type_Example1() Dim Mobile As Mob End Sub

Step 9: Now, with the variable name “Mobile,” we can access all the variables of “MobileBrands.”

Code:

Step 10: Now store each value like the below.

Code:

Type MobileBrands Name As String LaunchDate As Date Storage As Integer RAM As Integer Price As Long End Type Sub Type_Example1() Dim Mobile As MobileBrands Mobile.Name = "Redmi" Mobile.LaunchDate = "10-Jan-2019" Mobile.Storage = 62 Mobile.RAM = 6 Mobile.Price = 16500 MsgBox Mobile.Name & vbNewLine & Mobile.LaunchDate & vbNewLine & _ Mobile.Storage & vbNewLine & Mobile.RAM & vbNewLine & Mobile.Price End Sub

Finally, show the result in a VBA message box like the below one.

Code:

Sub Type_Example1() Dim Mobile As MobileBrands Mobile.Name = "Redmi" Mobile.LaunchDate = "10-Jan-2019" Mobile.Storage = 62 Mobile.RAM = 6 Mobile.Price = 16500 MsgBox Mobile.Name & vbNewLine & Mobile.LaunchDate & vbNewLine & _ Mobile.Storage & vbNewLine & Mobile.RAM & vbNewLine & Mobile.Price End Sub

Now run the code using the F5 key or manually and see the result in a message box.

Like this, we can use the “VBA Type” statement to define new data types in the subprocedure.

VBA Types vs. VBA Class

VBA Type is often compared to VBA Class modules. There are certain differences between them. Below are the common differences.

  • Diferența 1: Tipul VBA poate conține numai variabile publice. Clasa VBA poate conține atât variabile publice, cât și variabile private.
  • Diferența 2: Tipul VBA nu poate conține proceduri și funcții. Clasa VBA conține ambele, împreună cu proprietăți.
  • Diferența 3: Tipul VBA poate fi declarat în oricare dintre module și proceduri. Clasa VBA poate fi declarată numai în module de clasă dedicate.

Articole interesante...