Userforms: Run same code when enter any textbox

Hi There,

i have 15 textboxes in my userform (all with tags).

instead of having 15 seperate sub routines that call on one macro is there a way i can write some code that, on entering any texbox within a form, a specific routine would be called

i tried using the Userform_click sub like so, but with no joy:

Private Sub UserForm_Click()
Dim Octrl As Control

Octrl = Me.ActiveControl

If TypeOf Octrl Is MSForms.TextBox Then
    Select Case Len(Octrl.TAG)
        Case 2
            ControlSub
        Case Else
            'Do Nothing
    End Select
End If
End Sub

i appreciate any help on this

thansk for reading and for any help offered

cheers