B
B52
Guest
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
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