ENUM este o formă scurtă pentru enumerări, aproape în fiecare limbaj de programare avem enumerări unele sunt predefinite și altele sunt enumerări definite de utilizator, ca în VBA Vbnewline este o enumerare și putem face propriile enumerări folosind instrucțiunea ENUM.
Enumerații VBA (Enum)
De obicei declarăm variabile și le atribuim tipuri de date. Tipurile de date obișnuite pe care le folosim sunt „Întreg, lung, simplu, dublu, variantă și șir”. Dar mai avem încă un tip de date, adică VBA „Enum”. Trebuie să vă gândiți la ce este aceasta și să arate un lucru ciudat, dar pentru a vă elimina toate îndoielile, vă prezentăm acest articol despre „Enumerări VBA”.
Ce este VBA Enum?
„Enum” înseamnă Enumerații. Enum este un tip de variabilă la fel ca șirul sau întregul sau orice alt tip de date, dar aici creăm un element de listă folosind instrucțiunea Excel VBA Enum. Enumerarea înseamnă „acțiunea de a menționa un număr de lucruri unul câte unul”.
În Excel, VBA Enum este un tip care conține o enumerare de constante. Enumerațiile creează o listă de articole și le formează într-un grup. De exemplu, tipul de telefoane mobile: „Redmi, Samsung, Apple, Vivo, Oppo”.
Folosind enumerări, le putem grupa pe toate sub o singură valoare. Enum poate fi folosit ca variabile în VBA și este un tip de date variabil numeric de LONG.
Formula VBA Enum
Dacă nu înțelegeți nimic, nu vă faceți griji. Veți obține încet-încet. Acum aruncați o privire la formula VBA Enum.
Enum GroupName Member1 = (Long) Member2 = (Long) Member3 = (Long) Member4 = (Long) Member5 = (Long) End Enum
După cum am spus la început, Enum poate fi utilizat ca variabilă și este tipul de date variabilă numerică Long.
Exemple de VBA Enum
Înainte de a începe exemplele Enum, permiteți-mi să vă arăt exemplul „Constant” în VBA. Constant este, de asemenea, un cuvânt folosit pentru a declara variabila în VBA.
Uită-te la codurile de mai jos.
Cod:
Opțiune Explicit Const Samsung = 15000 Const VIVO = 18000 Const Redmi = 8500 Const Oppo = 18500 Sub Enum_Example1 () End Sub
Am declarat variabilele din partea de sus a modulului folosind cuvântul Const.
Const Samsung = 15000
Const VIVO = 18000
Const Redmi = 8500
Const Oppo = 18500
Acum știu că toate aceste variabile sunt un membru al grupului Mobile. Dacă vreau să folosesc aceste variabile, să spunem „Vivo” în modul.
Cod:
Sub Enum_Example1 () V End Sub
Pe măsură ce încep personajul „v”, pot vedea multe alte lucruri ale VBA amestecate cu ele, fiind lucrurile care încep cu litera „v”.
Aici apare imaginea „Enumerărilor” VBA.
Pentru o mai bună înțelegere, să încercăm să schimbăm culoarea de fundal a celulei.
Cod:
Sub Enum_Example1 () AcriveCell.Interior.Color = RGB End Sub
După cum puteți vedea în codul de mai sus, putem vedea toate culorile RGB disponibile în VBA. Toate acestea sunt constante cu nume minunate.
De fapt, toate aceste culori RGB fac parte din enumerarea familiei numită „ xlRGBColor”.
Cod:
Sub Enum_Example1 () AcriveCell.Interior.Color = xlrg End Sub
Folosind aceste enumerări VBA, de fapt, pot accesa toți membrii grupului acestei enumerări.
Cod:
Sub Enum_Example1 () AcriveCell.Interior.Color = XlRgbColor. Sfârșitul Sub
După cum putem vedea în imaginea de mai sus, vedem doar combinații de culori, nimic altceva. Aceasta este ceea ce simplă prezentare generală a „VBA Enum”.
Ok, acum ne vom întoarce la exemplul nostru original de membri ai grupului mobil. La fel cum am văzut membrii grupului de culoare RGB în mod similar, putem declara variabilele folosind instrucțiunea VBA Enum.
Cod:
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"). Valoare = Department.Finance End Sub
În mod similar, pentru toate celelalte celule, selectați numele departamentelor respective.
Cod:
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
Rulați acest cod VBA, vom primi suma salarială alocată pentru aceste departamente.
Acesta este modul în care putem folosi VBA Enum.
Puteți descărca acest VBA Enum Excel aici. Șablon Excel VBA Enum
