Discussion :

[Papounet34]

Bonjour,

je suis tombé par hasard sur votre site...
je maîtrisais assez bien Access, mais depuis que je suis en retraite, j'ai oublié bien des choses. Notamment celle ci (PJ)

Je suis sur Access 2000, XP

Je dois afficher un formulaire provenant d' une requête sélection très simple, qui contient un numéro de clé.

Tout va bien lorsque le formulaire source est nommé dans la requête, comme ci joint. Mais d'autres formulaires, avec d'autres noms sont amenés à utiliser cette requête. Pour éviter d'avoir autant de requêtes que de formulaires, il me semble me souvenir qu'on peut utiliser une expression générique du type [FormActif].cle .or j'ai beau essayer, j'ai alors une boite de dialogue qui me demande [FormActif].cle ?.

Par ailleurs, je voudrais désactiver la molette de souris, j'ai essayé avec le tuto de frank, mais je n'ai pas trouvé la dll Mouse Wheel dans VBA Outils Références, et ça me paraît très compliqué, de faire ça a chaque formulaire !

Pouvez vous m'aider ??

merci infiniment

Papounet 34

[loufab]

Bonjour et bienvenue !

Par formActif tu veux parlé de Screen.activeform. Le problème est qu'il n'est disponible qu'en VBA.

Tu peux toujours créer une fonction si le controle du formulaire porte toujours le même nom.

Par exemple avec 2 formulaire contenant un controle nommé Cle.

Tu crée un module avec ce code.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
public function RetourneCle()
      RetourneCle = screen.activeForm.controles("Cle").value
end function

Dans tes requêtes au lieu de faire l'appel comme tu le fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Formulaires!monform!cle

mets simplement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=RetourneCle()

Cordialement,

[Papounet34]

Bonsoir,

Merci, Loufab pour ta réponse. Mais j'ai eu beau suivre tes conseils, j'ai créé un module appelé RetourneCle, je l'appelle dans une macro avant d'afficher mon formulaire "résultats" eh bien je n'ai eu que des messages d'erreur, apparemment soit il ne reconnait pas la procédure, soit il ne trouve pas la clé du formulaire, bref, au secours !! Ci joint copie d'écran.

J'ai même essayé de récupérer la valeur dans une boîte de message....rien.

Merci encore

Papounet34

[User]

Salut,

Une petite chose:

dans la fonction que t'a donné Loufab c'est:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
public function RetourneCle()
      RetourneCle = screen.activeForm.controles("Cle").value
end function

et non pas:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
public function RetourneCle()
      RetourneCle = screen.activeForm.controles(Cle).value
end function

D'autre part tu dois avoir un contrôle nommé "Cle" dans ton formulaire

[loufab]

Bonjour,
En effet Papounet la remarque faite par User est pertinante. La syntaxe que je donne doit être écrite tel quelle et pas faire l'objet de modification, surtout enlever des double cotes (" "). Celles-ci sont OBLIGATOIRES.

La fonction ainsi créée doit être utilisée DANS la requête comme je te l'ai précisé, la mettre dans une macro ne sert à rien puisqu'il n'y a aucune interaction entre requete et macro.