Bonjour,
J'ai un formulaire avec un onglet comportant les pages : Entrée, Plat, Dessert. Dans chaque page il ya une zone de liste indépendante correspondante : lstEntree, lstPlat et lstDessert.
Je souhaite à partir d'un menu personnalisé récupérer la valeur de la liste déroulante en cours d'utilisation pour ensuite l'utiliser pour ouvrir un formulaire basé sur ces valeurs (code intégré à un module)
J'ai commencé ma réflexion, le plus simple c'est que dans la fonction AfterUpDate de chaque liste je puisse stocker dans une variable la valeur en cours.
Et que la fonction écrite dans le module récupère la valeur de la variable
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Private Sub lstEntree_AfterUpdate() Dim MonCritere As String MonCritere = Me.lstEntree End Sub
Le problème c'est que la valeur se perd car elle n'est pas stockée.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Public Function EditionPlat() MonCritère2 = "[Plat] = " & MonCritere DoCmd.OpenForm "frm_Plat", acNormal, , MonCritère2, , acDialog End Function
Je sais que c'est un problème de base mais pourriez vous m'aider
PS : Access 2002
Merci
Partager