fermeture d'un userform sous excel 2003 (vba)

Question

bonjour,
je travaille dans excel 2003 à l'aide de vba
voici la manière dont "j'oblige" une saisie 
Private Sub TextBox_nom_Exit(ByVal Cancel As MSForms.ReturnBoolean)

TextBox_nom.Value = StrConv(TextBox_nom.Value, vbUpperCase)
' j'oblige une saisie dans le champ nom
If Len(TextBox_nom) = 0 Then
MsgBox "Saisie d'un nom obligatoire "
'( ceci permet de forcer la saisie et de ne pas quitter sans que la saisie n'est pas faite)
Cancel = True
End If...
Donc si j'ouvre mon userform par erreur et que je veux le fermer par mon bouton quitte (unload monuserform...)
un message box apparaît qui me renvoie mon message "Saisie d'un nom obligatoire".
J'aimerais
dans le cas de cette erreur d'ouverture que mon userform puisse se
fermer par mon bouton quitte sans que ce msgbox apparaisse. Est-ce
possible ?

bigfish_le vrai · Answer

Salut,

si tu n'as qu'un seul bouton sur ton userform pour faire ce que tu veux faire ce n'est pas possible.
Donc il faut 2 boutons un pour valider et un pour quiter.
De plus l'utilisation de l'evenement TextBox_nom_Exit dans ce cas n'est pas utile. Il suffit juste de verifier qu'un nom a bien
été saisie lors du clic sur le bouton valider.

nasilo · Answer

Bonjour,
Merci beaucoup pour vos renseignements qui m'ont permis de résoudre mon problème du moment.
A plus tard sans aucun doute pour d'autre questions....
Bonne journée à toutes et à tous

Fermeture d'un userform sous excel 2003 (vba)

2 réponses

Votre réponse

Discussions similaires