VBA ENUM

ENUM è una forma abbreviata per le enumerazioni, quasi in ogni linguaggio di programmazione abbiamo enumerazioni alcune sono predefinite e altre sono enumerazioni definite dall'utente, come in VBA Vbnewline è un'enumerazione e possiamo creare le nostre enumerazioni usando l'istruzione ENUM.

Enumerazioni VBA (Enum)

Di solito dichiariamo variabili e assegniamo loro tipi di dati. I tipi di dati comuni che utilizziamo sono "Integer, Long, Single, Double, Variant e String". Ma abbiamo un altro tipo di dati, ovvero VBA "Enum". Stai pensando a cosa sia questo e sembra una cosa strana, ma per cancellare tutti i tuoi dubbi presentiamo questo articolo su "Enumerazioni VBA"

Cos'è VBA Enum?

"Enum" significa Enumerazioni. Enum è un tipo di variabile proprio come la nostra stringa o numero intero o qualsiasi altro tipo di dati, ma qui creiamo un elemento di elenco utilizzando l'istruzione Enum VBA di Excel. Enumerazione significa "l'azione di menzionare una serie di cose una per una".

In Excel VBA Enum è un tipo che contiene un'enumerazione di costanti. Le enumerazioni creano un elenco di elementi e li inseriscono in un gruppo. Ad esempio tipo di cellulare: "Redmi, Samsung, Apple, Vivo, Oppo".

Usando le enumerazioni possiamo raggrupparle tutte sotto un unico valore. Enum può essere utilizzato come variabili in VBA ed è un tipo di dati di variabile numerica di LONG.

Formula di VBA Enum

Se non stai capendo nulla, non preoccuparti, lentamente ci prenderai la mano. Ora dai un'occhiata alla formula di VBA Enum.

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

Come ho detto all'inizio, Enum può essere utilizzato come variabile ed è il tipo di dati della variabile numerica di Long.

Esempi di VBA Enum

Prima di iniziare gli esempi Enum, lascia che ti mostri un esempio "costante" in VBA. Constant è anche una parola usata per dichiarare la variabile in VBA.

Guarda i seguenti codici.

Codice:

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

Ho dichiarato le variabili nella parte superiore del modulo utilizzando la parola Const.

Const Samsung = 15000

Cost VIVO = 18000

Const Redmi = 8500

Const Oppo = 18500

Ora so che tutte queste variabili sono un membro del gruppo di Mobile. Se voglio usare queste variabili diciamo "Vivo" nel modulo.

Codice:

 Sub Enum_Example1 () V End Sub 

Quando inizio il carattere "v" posso vedere molte altre cose di VBA mescolate con loro erano le cose che iniziano con la lettera "v".

È qui che entra in gioco l'immagine di "Enumerazioni" VBA.

Per una migliore comprensione proviamo a cambiare il colore di sfondo della cella.

Codice:

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

Come puoi vedere nel codice sopra possiamo vedere tutti i colori RGB disponibili in VBA. Queste sono tutte costanti con nomi meravigliosi.

In realtà, tutti questi colori RGB fanno parte dell'enumerazione familiare chiamata " xlRGBColor ".

Codice:

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

Utilizzando effettivamente queste enumerazioni VBA, posso accedere a tutti i membri del gruppo di questa enumerazione.

Codice:

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

Come possiamo vedere nell'immagine sopra vediamo solo combinazioni di colori nient'altro. Questo è ciò che la semplice panoramica del "VBA Enum".

Ok, ora torneremo al nostro esempio originale di membri del gruppo Mobile. Analogamente a come abbiamo visto i membri del gruppo del colore RGB in modo simile, possiamo dichiarare le variabili utilizzando l'istruzione VBA Enum.

Codice:

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

Ora ho dichiarato tutti i marchi di telefonia mobile nel gruppo "Mobiles" utilizzando le dichiarazioni "Enum".

Utilizzando il nome del gruppo "Cellulari" ora posso accedere a tutti questi marchi nel modulo.

Codice:

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

Seleziona il gruppo e metti un punto per vedere tutti i membri del gruppo.

Guarda che possiamo vedere solo i membri del gruppo del gruppo "Cellulari" nient'altro. È così che possiamo utilizzare le enumerazioni VBA per raggruppare un elenco di elementi sotto lo stesso tetto.

Utilizzo delle variabili di enumerazione VBA per archiviare i dati

Vediamo un semplice esempio di utilizzo delle variabili Enum dichiarate. Dichiarare il nome del gruppo Enum come "Dipartimento" e aggiungere i nomi del reparto come membro del gruppo.

Codice:

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

Ho dichiarato i numeri di stipendio di ogni dipartimento davanti a loro.

Ora memorizzeremo i valori di questi numeri nel foglio Excel. Prima di applicare il codice creare una tabella come di seguito.

Ora torna all'editor di visual basic e fai riferimento alla cella B2 utilizzando l' oggetto RANGE .

Codice:

 Sub Enum_Example1 () Intervallo ("B2"). Valore = End Sub 

Nella cella A2 abbiamo il reparto Finanza e quindi nella cella B2 memorizzeremo lo stipendio di questo reparto. Quindi, prima accedi al nome del gruppo " Dipartimento ".

Codice:

 Sub Enum_Example1 () Intervallo ("B2"). Valore = Dep End Sub 

Ora in questo gruppo, possiamo vedere solo i nomi dei dipartimenti dichiarati .

Codice:

Sub Enum_Example1 () Intervallo ("B2"). Valore = Reparto. End Sub

Seleziona il nome del dipartimento " Finanza ".

Codice:

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

Allo stesso modo, per tutte le altre celle selezionare i rispettivi nomi di reparto.

Codice:

 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