Bonjour à tous

J'ai une userform avec 4 frame et dans chaque frame 10 textbox jusque la tout va bien.
Chaque textbox a une procedure textbox_Exit du type:




Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    If TextBox1.Value <> "" Then
 
        If (IsDate(TextBox1)) = True Then
            h1 = Replace(TextBox1.Value, ".", ":")
            TextBox1 = Format(TextBox1.Value, "hh\H mm")
        Else
            MsgBox "Entrez une valeur valide !!": _
                Cancel = True: Exit Sub
        End If
    End If
    TextBox1.BackColor = RGB(255, 255, 255)
End Sub
Donc mon problème et que quand je passe d'un textbox a un autre tout va bien, meme quand il sont dans des frame diffèrentes.

Mais quand je clic sur le bouton Ok de la userform la procedure exit du textbox actif à ce moment là ne fonctionne pas.

Quelqu'un pourrait me dire pourquoi et comment palier à ce phénomène.

Merci d'avance