VBA Enum - Trinnvise eksempler for bruk av VBA-oppregninger

Innholdsfortegnelse

VBA-oppregninger (Enum)

ENUM er en kort form for oppføringer, nesten i hvert programmeringsspråk har vi oppregninger, noen er forhåndsdefinerte og andre er brukerdefinerte oppføringer, som i VBA er Vbnewline en oppregning, og vi kan lage våre egne oppføringer ved hjelp av ENUM-setningen.

VBA-oppregninger (Enum)

Vi erklærer vanligvis variabler og tilordner datatyper til dem. De vanligste datatypene vi bruker er "Heltall, Lang, Enkelt, Dobbelt, Variant og String." Men vi har en datatype til, dvs. VBA "Enum." Du må tenke på hva som er dette og ser merkelig ut, men for å fjerne all tvil presenterer vi denne artikkelen om "VBA Enumerations."

Hva er VBA Enum?

"Enum" betyr oppføringer. Enum er en type variabel akkurat som streng eller heltall eller hvilken som helst annen datatype, men her lager vi et listeelement ved hjelp av Excel VBA Enum-setning. Oppregning betyr "handlingen med å nevne en rekke ting en etter en."

I Excel er VBA Enum en type som inneholder en oppregning av konstanter. Oppregninger lager en liste over elementer og lager dem i en gruppe. For eksempel type mobiltelefoner: "Redmi, Samsung, Apple, Vivo, Oppo."

Ved hjelp av enumerasjoner kan vi gruppere dem alle under en enkelt verdi. Enum kan brukes som variabler i VBA, og det er en numerisk variabel datatype LONG.

Formelen til VBA Enum

Hvis du ikke forstår noe, ikke bekymre deg. Du vil sakte få tak på det. Ta en titt på formelen til VBA Enum.

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

Som jeg fortalte i begynnelsen, kan Enum brukes som en variabel, og det er den numeriske variabeldatatypen Lang.

Eksempler på VBA Enum

Før jeg begynner på Enum-eksemplene, la meg vise deg "Constant" -eksemplet i VBA. Constant er også et ord som brukes til å erklære variabelen i VBA.

Se på kodene nedenfor.

Kode:

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

Jeg har erklært variablene øverst i modulen ved å bruke Const-ordet.

Const Samsung = 15000

Const VIVO = 18000

Const Redmi = 8500

Const Oppo = 18500

Nå vet jeg at alle disse variablene er et gruppemedlem i Mobile. Hvis jeg vil bruke disse variablene, la oss si "Vivo" i modulen.

Kode:

Sub Enum_Example1 () V End Sub

Når jeg starter tegnet “v”, kan jeg se mange andre ting av VBA blandet med dem var de tingene som begynner med bokstaven “v.”

Det er her bildet av VBA “Enumerations” kommer inn i bildet.

For bedre forståelse, la oss prøve å endre celleens bakgrunnsfarge.

Kode:

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

Som du kan se i koden ovenfor, kan vi se alle RGB-farger som er tilgjengelige i VBA. Dette er alle konstanter med fantastiske navn med seg.

Actually, all these RGB colors are part of the family enumeration called “xlRGBColor.”

Code:

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

By using these VBA enumerations actually, I can access to all the group member of this enumeration.

Code:

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

As we can see in the above image, we see only color combinations, nothing else. This is what the simple overview of the “VBA Enum.”

Ok, now we will go back to our original example of Mobile group members. Like how we have seen group members of RGB color similarly, we can declare the variables by using the VBA Enum statement.

Code:

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"). Verdi = Department.Finance End Sub

På samme måte velger du de respektive avdelingsnavnene for alle de andre cellene.

Kode:

Underenum_eksempel1 () Område ("B2"). Verdi = avdeling. Finansområde ("B3"). Verdi = avdeling. HR-område ("B4"). Verdi = avdeling. Markedsområde ("B5"). Verdi = avdeling. .Sales End Sub