VBA Enum - Steg för steg-exempel för att använda VBA-uppräkningar

Innehållsförteckning

ENUM är en kort form för uppräkningar, nästan i varje programmeringsspråk har vi uppräkningar, vissa är fördefinierade och andra är användardefinierade uppräkningar, som i VBA är Vbnewline en uppräkning och vi kan göra våra egna uppräkningar med ENUM-uttalande.

VBA-uppräkningar (Enum)

Vi deklarerar vanligtvis variabler och tilldelar datatyper till dem. De vanliga datatyperna vi använder är "Heltal, lång, enkel, dubbel, variant och sträng." Men vi har en datatyp till, dvs. VBA "Enum." Du måste tänka på vad som är detta och ser konstigt ut, men för att ta bort alla dina tvivel presenterar vi den här artikeln om "VBA Enumerations."

Vad är VBA Enum?

"Enum" betyder uppräkningar. Enum är en typ av variabel precis som vår sträng eller heltal eller någon annan datatyp, men här skapar vi ett listelement med hjälp av Excel VBA Enum-uttalande. Uppräkning betyder "handlingen att nämna ett antal saker en efter en."

I Excel är VBA Enum en typ som innehåller en uppräkning av konstanter. Uppräkningar skapar en lista med objekt och gör dem till en grupp. Till exempel typ av mobiler: ”Redmi, Samsung, Apple, Vivo, Oppo.”

Med hjälp av uppräkningar kan vi gruppera dem alla under ett enda värde. Enum kan användas som variabler i VBA, och det är en numerisk variabeldatatyp LONG.

Formeln för VBA Enum

Oroa dig inte om du inte förstår någonting. Du kommer långsamt att få tag på det. Ta nu en titt på VBA Enums formel.

Enum GroupName Member1 = (Long) Member2 = (Long) Member3 = (Long) Member4 = (Long) Member5 = (Long) End Enum

Som jag sa i början kan Enum användas som en variabel, och det är den numeriska variabeldatatypen Long.

Exempel på VBA Enum

Innan jag börjar med Enum-exemplen, låt mig visa dig "Constant" -exemplet i VBA. Constant är också ett ord som används för att deklarera variabeln i VBA.

Titta på nedanstående koder.

Koda:

Alternativ Explicit Const Samsung = 15000 Const VIVO = 18000 Const Redmi = 8500 Const Oppo = 18500 Sub Enum_Example1 () End Sub

Jag har deklarerat variablerna högst upp i modulen med hjälp av Const-ordet.

Const Samsung = 15000

Const VIVO = 18000

Const Redmi = 8500

Const Oppo = 18500

Nu vet jag att alla dessa variabler är en gruppmedlem i Mobile. Om jag vill använda dessa variabler, låt oss säga "Vivo" i modulen.

Koda:

Sub Enum_Example1 () V End Sub

När jag startar karaktären "v" kan jag se många andra saker i VBA blandade med dem var de saker som börjar med bokstaven "v."

Det är här bilden av VBA “Enumerations” kommer in i bilden.

För bättre förståelse, låt oss försöka ändra cellens bakgrundsfärg.

Koda:

Sub Enum_Example1 () AcriveCell.Interior.Color = RGB End Sub

Som du kan se i ovanstående kod kan vi se alla RGB-färger som finns tillgängliga i VBA. Dessa är alla konstanter med underbara namn med den.

Egentligen är alla dessa RGB-färger en del av familjens uppräkning som kallas " xlRGBColor."

Koda:

Sub Enum_Example1 () AcriveCell.Interior.Color = xlrg End Sub

Genom att faktiskt använda dessa VBA-uppräkningar kan jag komma åt alla gruppmedlemmarna i denna uppräkning.

Koda:

Sub Enum_Example1 () AcriveCell.Interior.Color = XlRgbColor. Avsluta sub

Som vi kan se i bilden ovan ser vi bara färgkombinationer, inget annat. Detta är vad den enkla översikten av "VBA Enum."

Okej, nu kommer vi att återgå till vårt ursprungliga exempel på Mobile-gruppmedlemmar. Precis som hur vi har sett gruppmedlemmar i RGB-färg på samma sätt kan vi deklarera variablerna med hjälp av VBA Enum-uttalandet.

Koda:

Enum Mobiles Samsung = 15000 VIVO = 18000 Redmi = 8500 Oppo = 18500 End Enum Sub Enum_Example1 () End Sub

Now I have declared all the mobile brands under the “Mobiles” group by using “Enum” statements.

By using the group name “Mobiles,” now I can access all these brands in the module.

Code:

Enum Mobiles Samsung = 15000 VIVO = 18000 Redmi = 8500 Oppo = 18500 End Enum Sub Enum_Example1() Mob End Sub

Select the group and put a dot to see all the members of the group.

Look, we can see only the group members of the group “Mobiles,” nothing else. This is how we can use VBA Enumerations to group a list of items under one roof.

Using VBA Enumeration Variables to Store the Data

Let’s see a simple example of using declared Enum variables. Declare Enum group name as “Department” and add department’s names as the group member.

Code:

Enum Mobiles Finance = 150000 HR = 218000 Sales = 458500 Marketing = 718500 End Enum Sub Enum_Example1() End Sub

I have declared each department’s salary numbers in front of them.

Now we will store the values of these numbers to excel sheet. Before applying the code, create a table like below.

Now go back to the basic visual editor and refer the cell B2 by using the RANGE object.

Code:

Sub Enum_Example1() Range("B2").Value = End Sub

In A2 cell, we have the Finance department, and so in B2 cell, we will store the salary of this department. So first, access the group name “Department.”

Code:

Sub Enum_Example1() Range("B2").Value = Dep End Sub

Now in this group, we can see only declared department names.

Code:

Sub Enum_Example1() Range("B2").Value = Department. End Sub

Select the department named “Finance.”

Code:

Sub Enum_Example1 () Range ("B2"). Värde = Department.Finance End Sub

På samma sätt väljer du respektive avdelningsnamn för alla andra celler.

Koda:

Sub Enum_Example1 () Range ("B2"). Värde = Department.Finance Range ("B3"). Value = Department.HR Range ("B4"). Value = Department.Marketing Range ("B5"). Value = Department .Sales End Sub

Kör denna VBA-kod så får vi det tilldelade lönebeloppet för dessa avdelningar.

Så här kan vi använda VBA Enum.

Du kan ladda ner VBA Enum Excel här. VBA Enum Excel-mall

Intressanta artiklar...