VBA ENUM

ENUM es una forma corta para enumeraciones, casi en todos los lenguajes de programación tenemos enumeraciones, algunas están predefinidas y otras son enumeraciones definidas por el usuario, como en VBA Vbnewline es una enumeración y podemos hacer nuestras propias enumeraciones usando la declaración ENUM.

Enumeraciones de VBA (enumeración)

Por lo general, declaramos variables y les asignamos tipos de datos. Los tipos de datos comunes que usamos son “Entero, Largo, Único, Doble, Variante y Cadena”. Pero tenemos un tipo de datos más, es decir, VBA "Enum". Debes estar pensando qué es esto y se ve una cosa extraña, pero para despejar todas tus dudas te presentamos este artículo sobre “Enumeraciones VBA”

¿Qué es VBA Enum?

"Enum" significa enumeraciones. Enum es un tipo de variable como nuestra cadena o entero o cualquier otro tipo de datos, pero aquí creamos un elemento de lista usando la declaración Enum de Excel VBA. Enumeración significa “la acción de mencionar una serie de cosas una por una”.

En Excel, VBA Enum es un tipo que contiene una enumeración de constantes. Las enumeraciones crean una lista de elementos y los hacen en un grupo. Por ejemplo tipo de móviles: “Redmi, Samsung, Apple, Vivo, Oppo”.

Usando enumeraciones podemos agruparlos todos bajo un solo valor. Enum se puede usar como variables en VBA y es un tipo de datos de variable numérica de LONG.

Fórmula de VBA Enum

Si no comprende nada, no se preocupe, poco a poco lo dominará. Ahora eche un vistazo a la fórmula de VBA Enum.

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

Como dije al principio, Enum se puede usar como una variable y es el tipo de datos de variable numérica de Long.

Ejemplos de VBA Enum

Antes de comenzar con los ejemplos de Enum, permítame mostrarle el ejemplo "Constante" en VBA. Constante también es una palabra que se usa para declarar la variable en VBA.

Mira los códigos a continuación.

Código:

 Opción Const explícito Samsung = 15000 Const VIVO = 18000 Const Redmi = 8500 Const Oppo = 18500 Sub Enum_Example1 () End Sub 

He declarado las variables en la parte superior del módulo usando la palabra Const.

Const Samsung = 15000

Const VIVO = 18000

Const Redmi = 8500

Const Oppo = 18500

Ahora sé que todas estas variables son un miembro del grupo de Mobile. Si quiero usar estas variables, digamos "Vivo" en el módulo.

Código:

 Sub Enum_Example1 () V End Sub 

Cuando empiezo con el carácter "v" puedo ver muchas otras cosas de VBA mezcladas con ellas, eran las cosas que empiezan con la letra "v".

Aquí es donde entra en escena la imagen de las “Enumeraciones” de VBA.

Para una mejor comprensión, intentemos cambiar el color de fondo de la celda.

Código:

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

Como puede ver en el código anterior, podemos ver todos los colores RGB disponibles en VBA. Todas estas son constantes con nombres maravillosos.

En realidad, todos estos colores RGB son parte de la enumeración familiar llamada “ xlRGBColor ”.

Código:

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

Al usar estas enumeraciones VBA en realidad, puedo acceder a todos los miembros del grupo de esta enumeración.

Código:

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

Como podemos ver en la imagen de arriba solo vemos combinaciones de colores nada más. Esto es lo que ofrece la descripción general simple de la “VBA Enum”.

Bien, ahora volveremos a nuestro ejemplo original de miembros del grupo móvil. Al igual que hemos visto los miembros del grupo de color RGB de manera similar, podemos declarar las variables utilizando la declaración VBA Enum.

Código:

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

Ahora he declarado todas las marcas de móviles en el grupo "Móviles" utilizando declaraciones "Enum".

Al usar el nombre de grupo "Móviles" ahora puedo acceder a todas estas marcas en el módulo.

Código:

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

Seleccione el grupo y ponga un punto para ver todos los miembros del grupo.

Mira, solo podemos ver los miembros del grupo del grupo “Móviles” nada más. Así es como podemos usar las enumeraciones de VBA para agrupar una lista de elementos bajo un mismo techo.

Uso de variables de enumeración de VBA para almacenar los datos

Veamos un ejemplo simple del uso de variables declaradas Enum. Declare el nombre del grupo Enum como "Departamento" y agregue los nombres del departamento como miembro del grupo.

Código:

 Enum Mobile Finance = 150000 HR = 218000 Ventas = 458500 Marketing = 718500 End Enum Sub Enum_Example1 () End Sub 

He declarado los números de salario de cada departamento delante de ellos.

Ahora almacenaremos los valores de estos números en la hoja de Excel. Antes de aplicar el código, cree una tabla como la siguiente.

Ahora regrese al editor visual básico y consulte la celda B2 usando el objeto RANGE .

Código:

 Sub Enum_Example1 () Rango ("B2"). Valor = 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 

Run this VBA code we will get the assigned salary amount for these departments.

This is how we can use VBA Enum.

You can download this VBA Enum Excel here. VBA Enum Excel Template