In the declarations section of the module;
'Const can only be accessed within the module...
Private Const ModuleName As String ="MyModule"
'Const can be accessed by other modules...
Public Const ModuleVersion As String = "v1.0"
'Variable can only be accessed within the module...
Private msModuleName As String = "MyModule"
'Variable can only be accessed by other modules...
Public msModuleVersion As String = "v1.0"
'Sub/Function can only be used by other procedures within the module...
Private Sub MySub()
.
.
.
End Sub
'Sub/Function can only be used by procedures in other modules...
Public Sub MyOtherSub()
.
.
.
End Sub
'Typically used to expose private variables to other modules...
Public Property Get ModuleName() as string
return msModulename
End Property
For the benefit of others, please mark posts as answered or helpful when they answer or assist you in finding the answer. "Don't confuse fame with success. Paris Hilton is one; Helen Keller is the other." - with apologies to Erma Bombeck for
changing her words.