Bonjour
Voila mon probleme, sur mon formulaire j'ai deux liste deroulant, la premiere qui selectione un societe et la deuxieme les produit.
Bien evidamement je ne veux affiché dans la deuxieme que les produit corespondant à la societe selectioné plus haut.
J'ai fait un module VBA que se lance lorsque la premiere liste est modifier :
Il y a une partie du code qu'il marche car la deuxieme liste deroulant est plus grande pour les societes où il y a plus de produit mais la liste est blanche.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Private Sub Modifiable26_Change() Dim Str As String Dim soc As String soc = Forms![tbl Charges]![Modifiable22] ' je selection la societe selectioné dans la liste ' requette qui selectione les produit qui apartienne a la societe Str = "SELECT [tbl Produits].[Titre_Produit] FROM [tbl Produits] WHERE ((([tbl Produits].Société)='" + soc + "'));" Me.Modifiable14.RowSource = Str Me.Modifiable14.AddItem (Str) Me.Modifiable14.Requery End Sub
(il n'y à rien d'ecrit)
Si une personne à une idée ....
Même si ce n'est pas avec ma methode.
Merci de m'avoir lu.
Partager