Discussion :

[Ecureuil56]

Bonjour,

J'ai créé un userform avec différents champs à renseigner.
Pour éviter les erreurs de saisie pour un numéro de téléphone, j'ai créé une msgbox avec le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Txt_teleph1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Len(Txt_teleph1) <> 10 Then
        MsgBox "Vous devez saisir 10 chiffres"
        Cancel = True
        Exit Sub
    End If
End Sub

Cela fonctionne très bien.
Je voudrais désactiver ce message quand j'appuie sur le bouton "ANNULER" ou sur la croix de mon Userform.
En effet, pour le moment, après avoir appuyé sur le bouton "ANNULER" ou appuyé sur la croix, la msgbox apparaît avec mon message "vous devez saisir 10 chiffres".

Merci d'avance

[Thautheme]

Bonsoir Écureuil, bonsoir le forum,

Essaie l'instruction End. Tant sur le bouton Annuler et sur l'événement QueryClose de l'UserForm.

[Ecureuil56]

Super, merci beaucoup : ça marche.