Making your own custom event subs

[Jotaf98]

Another approach would be to make a function to return the value of the var, and another to set it.

Dim MyVar As Long

Public Sub SetMyVar(ToWhat As Long)
    MyVar = ToWhat
End Sub

Public Function GetMyVar() As Long
    GetMyVar = MyVar
End Sub

There, it should be simplier and faster than Property Get/Set, but you would have to use these functions instead of Something = MyVar or MyVar = Something...

Oh, and thanks for replying. I like people that say "Thanks dude that works you're great"