VBA Enum - Schritt-für-Schritt-Beispiele zur Verwendung von VBA-Aufzählungen

Inhaltsverzeichnis

VBA-Aufzählungen (Enum)

ENUM ist eine Kurzform für Aufzählungen, fast in jeder Programmiersprache haben wir Aufzählungen, einige sind vordefiniert und einige sind benutzerdefinierte Aufzählungen, wie in VBA. Vbnewline ist eine Aufzählung und wir können unsere eigenen Aufzählungen mit der ENUM-Anweisung erstellen.

VBA-Aufzählungen (Enum)

Normalerweise deklarieren wir Variablen und weisen ihnen Datentypen zu. Die gängigen Datentypen, die wir verwenden, sind "Integer, Long, Single, Double, Variant und String". Wir haben aber noch einen Datentyp, nämlich VBA "Enum". Sie müssen sich überlegen, was das ist und was seltsam aussieht, aber um all Ihre Zweifel auszuräumen, präsentieren wir diesen Artikel über „VBA-Aufzählungen“.

Was ist VBA Enum?

"Aufzählung" bedeutet Aufzählungen. Enum ist ein Variablentyp, genau wie unsere Zeichenfolge, Ganzzahl oder ein anderer Datentyp. Hier erstellen wir jedoch ein Listenelement mit der Excel VBA Enum-Anweisung. Aufzählung bedeutet "die Handlung, eine Reihe von Dingen einzeln zu erwähnen".

In Excel ist VBA Enum ein Typ, der eine Aufzählung von Konstanten enthält. Aufzählungen erstellen eine Liste von Elementen und bilden sie in einer Gruppe. Zum Beispiel Art des Handys: "Redmi, Samsung, Apple, Vivo, Oppo."

Mithilfe von Aufzählungen können wir alle unter einem einzigen Wert zusammenfassen. Enum kann als Variablen in VBA verwendet werden und ist ein numerischer Variablendatentyp von LONG.

Die Formel von VBA Enum

Wenn Sie nichts verstehen, machen Sie sich keine Sorgen. Sie werden langsam den Dreh raus bekommen. Schauen Sie sich nun die Formel von VBA Enum an.

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

Wie ich am Anfang sagte, kann Enum als Variable verwendet werden, und es ist der Datentyp der numerischen Variablen von Long.

Beispiele für VBA Enum

Bevor ich mit den Enum-Beispielen beginne, möchte ich Ihnen das Beispiel „Konstante“ in VBA zeigen. Konstante ist auch ein Wort, mit dem die Variable in VBA deklariert wird.

Schauen Sie sich die folgenden Codes an.

Code:

Option Explizite Konstante Samsung = 15000 Konstante VIVO = 18000 Konstante Redmi = 8500 Konstante Oppo = 18500 Sub Enum_Example1 () End Sub

Ich habe die Variablen oben im Modul mit dem Wort Const deklariert.

Const Samsung = 15000

Const VIVO = 18000

Const Redmi = 8500

Const Oppo = 18500

Jetzt weiß ich, dass alle diese Variablen ein Gruppenmitglied von Mobile sind. Wenn ich diese Variablen verwenden möchte, sagen wir im Modul "Vivo".

Code:

Sub Enum_Example1 () V End Sub

Wenn ich den Charakter "v" beginne, kann ich sehen, dass viele andere Dinge von VBA mit ihnen verwechselt wurden, die mit dem Buchstaben "v" beginnen.

Hier kommt das Bild von VBA „Enumerations“ ins Spiel.

Versuchen wir zum besseren Verständnis, die Hintergrundfarbe der Zelle zu ändern.

Code:

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

Wie Sie im obigen Code sehen können, können wir alle in VBA verfügbaren RGB-Farben sehen. Dies sind alles Konstanten mit wunderbaren Namen.

Tatsächlich sind alle diese RGB-Farben Teil der Familienaufzählung „ xlRGBColor“.

Code:

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

Durch die Verwendung dieser VBA-Aufzählungen kann ich auf alle Gruppenmitglieder dieser Aufzählung zugreifen.

Code:

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

Wie wir im obigen Bild sehen können, sehen wir nur Farbkombinationen, sonst nichts. Dies ist die einfache Übersicht über die "VBA-Enumeration".

Ok, jetzt kehren wir zu unserem ursprünglichen Beispiel für Mitglieder der Mobile-Gruppe zurück. Ähnlich wie wir Gruppenmitglieder mit RGB-Farben ähnlich gesehen haben, können wir die Variablen mithilfe der VBA-Enum-Anweisung deklarieren.

Code:

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

Jetzt habe ich alle Mobilfunkmarken unter der Gruppe "Mobiles" mithilfe von "Enum" -Anweisungen deklariert.

Mit dem Gruppennamen „Handys“ kann ich jetzt auf alle diese Marken im Modul zugreifen.

Code:

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

Wählen Sie die Gruppe aus und setzen Sie einen Punkt, um alle Mitglieder der Gruppe anzuzeigen.

Schauen Sie, wir können nur die Gruppenmitglieder der Gruppe "Handys" sehen, sonst nichts. Auf diese Weise können wir VBA-Aufzählungen verwenden, um eine Liste von Elementen unter einem Dach zu gruppieren.

Verwenden von VBA-Aufzählungsvariablen zum Speichern der Daten

Sehen wir uns ein einfaches Beispiel für die Verwendung deklarierter Enum-Variablen an. Deklarieren Sie den Namen der Enum-Gruppe als "Abteilung" und fügen Sie die Namen der Abteilung als Gruppenmitglied hinzu.

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

Wählen Sie für alle anderen Zellen die entsprechenden Abteilungsnamen aus.

Code:

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