Formulaire access comme userform excel

Bonjour a tous,
la question semble peut etre simple mais je n ai pas trouve de reponse satisfaisante.
Mon souhait est simple : je veux creer un formulaire pour que l utilisateur rentre des parametres que je reprend ensuite pour faire fonctionner mon programme vba. (un userform excel en fait)

Dans Access bizarrement je suis confronte a deux pbs :
1) Quand j ecris dans mon module, DoCmd.OpenForm NomdeMonForm, le module ne s arrete pas pour attendre que l utilisateur rentre une valeur. Du coup ca plante.

2)Comment je peux recuperer une valeur de mon formulaire pour l integrer dans mon programme ?

J ai trouve en fait une solution mais elle ne me parait pas du tout satisfaisante :

Code:

---

1 2 3 4

Private Sub Form_Close() Call Maprocedure(parametres entree par l utilisateur) End Sub

---

Je veux pas passer par la. je veux faire comme avec excel, tout simplement !

Bonjour,


1° avec :

Code:

---

DoCmd.OpenForm NomdeMonForm

---

tu ouvres le formulaire ;

2° l'utilisateur prend tout le temps qu'il veut pour compléter les champs ;

3° tu devrais te rendre capable de détecter que l'utilisateur a terminé, par exemple, il clique sur un bouton ;

4° à la suite de cet événement, tu reprends la main ;

5° tu accèdes au contenu des différents contrôles avec la syntaxe :

Code:

---

forms!LeNomDuFormulaire!LeNomDuContrôle

---

ou simplement :

Code:

---

Me.LeNomDuContrôle

---

si ton code est inclus dans le module du formulaire.

Mon probleme c est que apres l ouverture de mon form j ai mon code qui continue ! Imaginons cette situation :

Code:

---

1 2 3 4

DoCmd.OpenForm "frm_Input" MsgBox Forms!frm_Input!strInputYear

---

Ce que je veux, c est que mon form s ouvre et que mon code s arrete pour laisser le temps a l utilisateur de mettre la valeur qu il souhaite dans le controle strInputYear.
Or pour l instant j ai une erreur parceque le form s ouvre et la msgbox veut tout de suite s ouvrir aussi : du coup evidemment strInputYear est vide !

Dans Excel quand on ecrit le meme code, ce n est qu une fois que l utilisateur a rentre qc et ferme le userform que la msgbox s affiche.

Comment je dois faire ?

C'est ce que j'ai essayé de t'expliquer plus haut.
Il y a plusieurs étapes :

- avec du code, tu ouvres le formulaire, c'est mon 1° ;

- quand tu apprends que l'utilisateur a terminé son job, tu exécutes un autre code qui récupère les données du formulaire (ou de sa source) et tu en fais ce que tu dois. C'est le point 4° et suivant.

Si je comprends ce que tu dis ca veut dire qu il faut que je segmente mon projet en autant de parti qu il y a de formulaire ??

Code:

---

1 2 3 4 5 6

'Plein de code ... (Partie 1)   'A un moment j ai besoin d une valeur rentre par l utilisateur   'Plein de code (Partie 2)

---

Faut il que je fasse :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Sub Partie1() 'Plein de Code (Partie 1) DoCmd.OpenForm "Monform"   End Sub ' ???   Private Sub Form_Close Call Partie2() End Sub   Sub Partie2() 'Plein de code - la suite End Sub

---

Ca me parait etre une pietre solution !!

Désolé d'avoir perdu ton temps.

?? ca veut dire qu il n y a que cette solution ?