[VBA Excel] Lien entre userforms

Bonjour a tous,


Habituellement, j essaie de trouver mes reponses dans des posts anterieurs et ca marche plutot bien, mais la, j ai plus le temps et je voudrais me debloquer rapidement, donc merci de votre aide...

Voici mon probleme:

J ai un userform qui, lorsqu il est valide, en ouvre un autre (cet autre est determine par une des valeurs du premier, genre si la valeur est 1, le userform 1 sera ouvert, etc... pour une 10aine de userforms). Lorque le second userform est valide a son tour, les deux userforms se ferment et ttes les valeurs du 1er et 2nd userform sont inscrites dans mon tableau.
Ca, c est le cas ou tt va bien. Cependant, mon utilisateur voudrait pouvoir annuler la saisie complete au niveau du second userform. Or, s il clique effectivement sur "annuler", le second userform est decharge, le premier aussi, mais les valeurs saisies dans le premier userform sont inscrites dans le tableau, ce que je ne veux pas!

Bref, je cherche une methode pour que le 1er useform attende la validation du second avant de copier les infos dans mon tableau...

J espere que mon charabia est comprehensible...
Merci d avance a tous ceux qui voudront bhien me depanner.


Violette

bonjour violette et bienvenue sur le forum... n'aurai tu pas un peu de code à nous montrer histoire que l'on sache la méthode que tu utilise pour transférer tes données de tes userforms vers ton tableau ( ?feuille excel..?) ...

;)

De toute manière, je dirais de cacher (hide) le formulaire 1 (pas le décharger, unload) et faire tout le traitement dans le formulaire 2.

:salut:

1) Tu crées une variable Public, pour ça tu insère un module dans ton projet
et tu mets

Code:

---

1 2	Option Explicit Dim FlgValidation As Boolean

---

2) Dans tes formulaires 2 à 10 dans le bouton "Annuler", tu mets à jour ce Flag

Code:

---

1 2 3

Private Sub BnAnnuler_OnClick() FlgValidation = False End Sub

---

Pour le bouton "Valider", c'est l'inverse

Code:

---

1 2 3

Private Sub BnValider_OnClick() FlgValidation = True End Sub

---

3) Dans ton code, avant l'endroit ou tu mets à jour les valeurs,
tu testes le "FlgValidation" !

Code:

---

If FlgValidation = False then Exit Sub

---

Par exemple

J'espère avoir répondu à ta question ;)

Merci beaucoup pour votre aide! En fait, c etait vraiment pas grand chose, mais vu que je suis vraiment pas douee...

Ca y est, c est tout resolu et le programme est pret a fonctionner... Encore merci!


Violette