Public strVarA As String

Public lngVarB As Long

Sub ProcA ()

Dim intTeller1 As Integer

…

…

End Sub

Sub ProcB()

Dim intTeller2 As Integer

…

…

End Sub

De variabelen strVarA en intVarB zijn gekend in elke procedure van elke module.