<div>
These explain it better than I could quickly type up... 
 

<ul>
<li><a href="https://analystcave.com/vba-enum-using-enumerations-in-vba/" rel="ugc">VBA Enum - using enumerations in VBA</a></li>
<li><a href="http://www.cpearson.com/excel/Enums.aspx" rel="ugc">Enum Variable Type</a></li>
</ul>
 

<hr />
»bp
</div>

Developer

Sonny G

<div>
Short answer: Enums are constant values grouped together. They can mean anything, but it is best to declare an enum with members that have the same meaning. Plus, using them wisely will increase the readability of your code (instead of using hard coded "magic" values). Long answer: See links posted by Bill.
</div>

<div>
Enums are enumerations. This means that you assign names to numbers. It is meant for easier memorizing numeric constants which belong to one group. 
 
For example this method: 
 

<pre><code class="code-1 nolinks" id="code-20-43088989-1">Public Function Calulate(Operand1 As Long, Operand2 As Long, Operation As Long)
</code></pre>
 
where you define the operation +, -, *, / as numbers 1,2,3,4. 
Instead of calling it as 
 

<pre><code class="code-1 nolinks" id="code-20-43088989-2">Debug.Print Calculate(10, 2, 1)
Debug.Print Calculate(10, 2, 2)
Debug.Print Calculate(10, 2, 3)
Debug.Print Calculate(10, 2, 4)
</code></pre>
 
you can define an enumeratuion as 
 

<pre><code class="code-1 nolinks" id="code-20-43088989-3">Public Enum EnumOperation
 opAdd
 opSubtract
 opMultiply
 opDivide
End Enum
</code></pre>
Now you can use those names instead of numbers: 
 

<pre><code class="code-1 nolinks" id="code-20-43088989-4">Debug.Print Calculate(10, 2, opAdd)
Debug.Print Calculate(10, 2, opSubtract)
Debug.Print Calculate(10, 2, opMultiply)
Debug.Print Calculate(10, 2, opDivide)
</code></pre>
Per default an enum in VBA starts with the value 1 and increments it by one for each enum value. It is an Long/Integer and casted as necessary. So you can use those names, but are not forced to. Another thing is, enums are supported by Intellisense. 
 
But you can assign your own values to it, as long as these are unique and Long or Integer. This for example is used for constants which are used for bitwise operations like the constants for the MsgBox dialog (VBA.VbMsgBoxStyle). Here each enum value has its own assigned value following a bitwise pattern. 
 
 
E.g. a custom sample: 
 
 

<pre><code class="code-10 nolinks" id="code-20-43088989-5">Option Explicit

Public Enum EnumOperation
 opAdd
 opSubtract
 opMultiply
 opDivide
End Enum

Public Enum EnumOperation2
 opAdd2 = 1
 opSubtract2 = 2
 opMultiply2 = 4
 opDivide2 = 8
End Enum

Public Sub Test()

 Debug.Print &quot;Without names&quot;
 Calculate 10, 2, 1
 Calculate 10, 2, 2
 Calculate 10, 2, 3
 Calculate 10, 2, 4
 
 Debug.Print &quot;With names&quot;
 Calculate2 10, 2, opAdd
 Calculate2 10, 2, opSubtract
 Calculate2 10, 2, opMultiply
 Calculate2 10, 2, opDivide
 
 Debug.Print &quot;As numbers are used in the background, we don't need to use the names.&quot;
 Calculate2 10, 2, 1
 Calculate2 10, 2, 2
 Calculate2 10, 2, 3
 Calculate2 10, 2, 4
 
 Debug.Print &quot;Bitwise logic to allow to pass multipls values.&quot;
 Calculate3 10, 2, opAdd2 + opSubtract2
 Calculate3 10, 2, opMultiply2 + opDivide2
 
End Sub

Public Sub Calculate(Operand1 As Long, Operand2 As Long, Operation As Long)

 Select Case Operation
 Case Is = 1: Debug.Print Operand1 + Operand2
 Case Is = 2: Debug.Print Operand1 - Operand2
 Case Is = 3: Debug.Print Operand1 * Operand2
 Case Is = 4: Debug.Print Operand1 / Operand2
 End Select

End Sub

Public Sub Calculate2(Operand1 As Long, Operand2 As Long, Operation As EnumOperation)

 Select Case Operation
 Case Is = opAdd: Debug.Print Operand1 + Operand2
 Case Is = opSubtract: Debug.Print Operand1 - Operand2
 Case Is = opMultiply: Debug.Print Operand1 * Operand2
 Case Is = opDivide: Debug.Print Operand1 / Operand2
 End Select

End Sub

Public Sub Calculate3(Operand1 As Long, Operand2 As Long, Operation As EnumOperation2)

 If (Operation And opAdd2) = opAdd2 Then
 Debug.Print Operand1 + Operand2
 End If
 
 If (Operation And opSubtract2) = opSubtract2 Then
 Debug.Print Operand1 - Operand2
 End If
 
 If (Operation And opMultiply2) = opMultiply2 Then
 Debug.Print Operand1 * Operand2
 End If
 
 If (Operation And opDivide2) = opDivide2 Then
 Debug.Print Operand1 / Operand2
 End If

End Sub
</code></pre>
</div>

<div>
An Enum is a very useful "self-documenting code" technique. &nbsp;For example, you may have a frame control with several radio buttons. &nbsp;You can setup an Enum to assign text labels to the option button numbers and use the enum instead of the numbers. For example, Let's say you have a frame control (fraMyFrame) with the option buttons labeled "This Thing", "That Thing", and "Other Thing" (numbered 1,2,3) Set up an enum: <pre><code class="code-1 nolinks" id="code-20-43089023-1">Public Enum MyFrame
&nbsp; ThisThing=1
&nbsp; ThatThing=2
&nbsp; OtherThing=3
End Enum
</code></pre> Now, in your code, you can make your frame control coding more readable: <pre><code class="code-10 nolinks" id="code-20-43089023-2">Select Case fraMyFrame
Case MyFrame.ThisThing
&nbsp; (code here....)
Case MyFrame.ThatThing
&nbsp; (code here...)
Case MyFrame.OtherThing
&nbsp; (code here...)
Case Else
&nbsp; (code here...)
End Select

</code></pre> 
</div>

<div>
If you haven't discovered them already, I also recommend you learn to use "user-defined variable type" (google it:&nbsp; "vba user-defined variable type").
</div>

<div>
Thanks, All ! &nbsp;You all added to my knowledge. Thanks! Martin's article was very helpful.
</div>

<div>
Welcome. 

<hr />
»bp
</div>

<div>
<div class="content wysiwyg-content">
I have recently been exposed to Enums and i could use a quick overview.
</div>
</div>

I have recently been exposed to Enums and i could use a quick overview.

Can someone give me an explanation of Enums and some samples?

Visual Basic for Applications (VBA) enables building user-defined functions (UDFs), automating processes and accessing Windows API and other low-level functionality through dynamic-link libraries (DLLs). VBA is closely related to Visual Basic and uses the Visual Basic Runtime Library, but it can normally only run code within a host application rather than as a standalone program. It can, however, be used to control one application from another via OLE Automation. VBA is built into most Microsoft Office applications.