Besoin d'un coup de main SVP

[B52]

Bonjour à tous,

Etant un débutant en VBA je rencontre un problème,le voici:

J'ai crée un userform (nommé "Retouche") qui comporte 9 textbox afin de saisir des données dans une feuille EXCEL.
J'ai inclus dans mon code, des MsgBox afin de vérifier que tous les champs ont bien été renseignés. Mais lorsque j'arrive au dernier texbox (nommé: qté-retouchée) je ne peux plus revenir en arriere si j'ai oublier de remplir celui-ci. Voici la fin de mon code :

Private Sub verif9()
If Retouche.qté_retouchée = "" Then
MsgBox "Vous devez saisir une quantité de retouche", vbOKOnly + vbCritical, "Attention"
Else
End If
Retouche.Hide
Rows(3).Select
Selection.Insert
Selection.Delete
Unload Retouche
vouloir_imprimer.Show
End Sub

Comment après avoir eu ce message d'erreur, revenir dans le dernier textbox et le renseigner sans que mon userform se ferme.
Par avance merci et bonne continuation à tous !
@+
Stéphane

 

[Lord Nelson]

Salut Stéphane,

Tu as juste à déplacer le End If :

If Retouche.qté_retouchée = "" Then
MsgBox "Vous devez saisir une quantité de retouche", vbOKOnly + vbCritical, "Attention"
Else
Retouche.Hide
Rows(3).Select
Selection.Insert
Selection.Delete
Unload Retouche
vouloir_imprimer.Show
End If
End Sub

....et à trouver un titre pour le message "Code de validation de saisie", par exemple de préférence à "Au secours" "A l'aide" et autres expressions du même tonneau.

A+
Horatio

 

[B52]

Merci beaucoup Horatio !!!
ça marche parfaitement maintenant, et en regardant ta reponse, c'est logique ! (j'ai encore du boulot....lol...).
Merci encore et @+

Stéphane