VBA Enum | Przykłady krok po kroku korzystania z wyliczeń VBA

ENUM to krótka forma wyliczeń, prawie w każdym języku programowania mamy wyliczenia, niektóre są wstępnie zdefiniowane, a niektóre są wyliczeniami zdefiniowanymi przez użytkownika, tak jak w VBA Vbnewline jest wyliczeniem i możemy wykonać własne wyliczenia za pomocą instrukcji ENUM.

Wyliczenia VBA (wyliczenie)

Zwykle deklarujemy zmienne i przypisujemy im typy danych. Typowe typy danych, których używamy, to „Integer, Long, Single, Double, Variant i String”. Ale mamy jeszcze jeden typ danych, np. VBA „Enum”. Pewnie myślisz, co to jest i wygląda dziwnie rzecz, ale aby wyjaśnić wszystkie Twoje wątpliwości, przedstawiamy ten artykuł na temat „Wyliczenia VBA”

Co to jest VBA Enum?

„Enum” oznacza wyliczenia. Enum jest typem zmiennej, podobnie jak nasz ciąg znaków, liczba całkowita lub dowolny inny typ danych, ale tutaj tworzymy element listy za pomocą instrukcji Excel VBA Enum. Wyliczenie oznacza „czynność polegającą na wymienianiu kilku rzeczy jedna po drugiej”.

W programie Excel VBA Wyliczenie jest typem zawierającym wyliczenie stałych. Wyliczenia tworzą listę elementów i tworzą je w grupie. Na przykład typ telefonów komórkowych: „Redmi, Samsung, Apple, Vivo, Oppo”.

Używając wyliczeń, możemy zgrupować je wszystkie pod jedną wartością. Enum może być używane jako zmienne w VBA i jest to typ danych zmiennej numerycznej LONG.

Formuła VBA Enum

Jeśli niczego nie rozumiesz, nie martw się, powoli to zrozumiesz. Teraz spójrz na formułę VBA Enum.

 Enum GroupName Member1 = [Long] Member2 = [Long] Member3 = [Long] Member4 = [Long] Member5 = [Long] End Enum

Jak powiedziałem na początku Enum może być używane jako zmienna i jest to typ danych zmiennej numerycznej Long.

Przykłady VBA Enum

Zanim zacznę przykłady Enum, pokażę Ci przykład „stałej” w języku VBA. Stała jest również słowem używanym do deklarowania zmiennej w VBA.

Spójrz na poniższe kody.

Kod:

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

Zadeklarowałem zmienne w górnej części modułu za pomocą słowa Const.

Const Samsung = 15000

Const VIVO = 18000

Const Redmi = 8500

Const Oppo = 18500

Teraz wiem, że wszystkie te zmienne należą do grupy Mobile. Jeśli chcę użyć tych zmiennych, powiedzmy „Vivo” w module.

Kod:

 Sub Enum_Example1 () V End Sub

Kiedy zaczynam znak „v”, widzę, że wiele innych rzeczy związanych z VBA jest pomieszanych z tymi, które zaczynają się na literę „v”.

W tym miejscu pojawia się obraz VBA „Enumerations”.

Dla lepszego zrozumienia spróbujmy zmienić kolor tła komórki.

Kod:

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

Jak widać na powyższym kodzie, widzimy wszystkie kolory RGB dostępne w VBA. To są wszystkie stałe o wspaniałych nazwach.

W rzeczywistości wszystkie te kolory RGB są częścią wyliczenia rodziny o nazwie „ xlRGBColor ”.

Kod:

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

Korzystając z tych wyliczeń VBA, mogę uzyskać dostęp do wszystkich członków grupy w tym wyliczeniu.

Kod:

Sub Enum_Example1 () AcriveCell.Interior.Color = XlRgbColor. Napis końcowy

Jak widać na powyższym obrazku, widzimy tylko kombinacje kolorów, nic więcej. Oto prosty przegląd „VBA Enum”.

Ok, teraz wrócimy do naszego oryginalnego przykładu członków grupy Mobile. Podobnie jak widzieliśmy członków grupy kolorów RGB, podobnie możemy zadeklarować zmienne za pomocą instrukcji VBA Enum.

Kod:

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

Teraz zadeklarowałem wszystkie marki mobilne w grupie „Mobiles” używając oświadczeń „Enum”.

Używając nazwy grupy „Mobiles”, mam teraz dostęp do wszystkich tych marek w module.

Kod:

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

Wybierz grupę i umieść kropkę, aby zobaczyć wszystkich członków grupy.

Spójrz, widzimy tylko członków grupy „Mobiles” nic więcej. W ten sposób możemy użyć wyliczeń VBA do zgrupowania listy elementów pod jednym dachem.

Używanie zmiennych wyliczeniowych VBA do przechowywania danych

Zobaczmy prosty przykład użycia zadeklarowanych zmiennych Enum. Zadeklaruj nazwę grupy Enum jako „Dział” i dodaj nazwy działów jako członków grupy.

Kod:

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

Zadeklarowałem przed nimi wysokość wynagrodzeń każdego działu.

Teraz zapiszemy wartości tych liczb do arkusza Excela. Przed zastosowaniem kodu utwórz tabelę jak poniżej.

Teraz wróć do edytora Visual Basic i odnieś się do komórki B2 za pomocą obiektu RANGE .

Kod:

 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 name “Finance”.

Code:

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

Similarly, for all the other cells select the respective department names.

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