[AC-2010] Passage de paramètres en argument d'une macro ? [Résolu]

[Mailgifson]

Bonjour à tous,

Est-il possible de passer un argument à une macro Access ?

L'idée serait de passer des informations entre formulaires par l'intermédiaire d'une macro...

Merci d'avance pour vos réponses.

[User]

Salut,

Pourquoi ne pas le faire en VBA ?
Peux-tu détailler un peu plus ce que tu souhaites faire ?

A+

[Mailgifson]

En fait, j'aimerais passer des paramètres entre deux formulaires qui ne sont pas liés.

Un premier formulaire me permettrait de faire une recherche.
Un clic sur l'un des éléments de mon résultat ouvrirait alors un second formulaire avec les détails de cet élément.

La macro me servirait donc a ouvrir le second formulaire sur l'ID de l'élément sélectionné.

[User]

Re,

Dans ce cas, dans ta macro tu utilises l'action "OuvrirFormulaire"

Nom du formulaire: "Formulaire1" (le nom du 1er formulaire de recherche)

et dans conditionWhere tu mets un truc comme cela:

[ID]=[Formulaires]![Formulaire1]![ListeID]

Ici je suppose que tu cliques dans la liste nommée "ListeID" pour choisir l'ID qui provoque l'ouverture du 2ème formulaire sur cet ID.

A+

[Mailgifson]

Merci beaucoup, ça fonctionne très bien, mais c'est pas exactement le résultat que j'attends... C'est de ma faute, j'ai pas tout expliqué

En fait, j'ai créé un formulaire F1, ou j'y ai glissé deux autres formulaires F2 et F3.

F2 est mon formulaire de recherche et F3 mon formulaire "d'affichage".

C'est dans F3 que j'aimerais voir les détails de ma sélection. En gros, je voudrais modifier F3 quand je clique sur un élément dans F2.

Pour le moment, le formulaire s'ouvre dans une nouvelle fenêtre.

Je ne sais pas si je suis clair !?


PS : Juste pour info, est-ce que ta première solution peut fonctionner également avec un Etat ? J'ai pas l'impression qu'il est possible de récupérer un ID dans un Etat...

[User]

Salut,

Normalement tu devrais clore ce fil et ouvrir une nouvelle discussion avec un titre approprié, parce que maintenant ça n'a plus trop de rapport avec ton message d'origine

Sinon, ton nouveau problème demande d'utiliser du VBA, et de mettre le code sur l'évèvement après maj (AfterUpdate) de la liste ou tu choisis l'ID dans F2:

Si le champ ID est du type numérique :

Code :

1
2
Forms!F1!F3.form.RecordSource="Select * from TaTable where ID=" & Me.ListeID 
Forms!F1!F3.form.requery

Si ID est du type texte :

Code :

1
2
Forms!F1!F3.form.RecordSource="Select * from TaTable where ID='" & Me.ListeID & "'"
Forms!F1!F3.form.requery

A Adapter à ton cas :

TaTable : désigne la table ou la requête source de F3
ListeID : désigne la liste ou tu choisis ton ID dans F2

A+

PS: Oui l'exemple avec la macro fonctionne aussi pour les états, en choisissant l'action "OuvrirEtat". Voila

[Mailgifson]

Merci, tu es un champion User ! Ça marche parfaitement !

Pour info, j'ai utilisé "Filter" plutôt que "RecordSource", pour éviter de réécrire la requête.

Code :

1
2
3
 
Forms![F_CONSULTER]![F_FICHE].Form.Filter = "ID = " & Me.ID
Forms![F_CONSULTER]![F_FICHE].Form.FilterOn = True

PS : Désolé, pour le post. J'aurais dû effectivement refaire un nouveau post

[User]

De rien,

Penses à clore la discussion, on l'a bien mérité