Discussion :

[nicolovitch]

Bonjour à tous, Aprés plusieurs heures passées à chercher une solution sur le forum ou dans la faq, je m'adresse à vous (dernier espoir...)!

Je possède deux formulaires :
- un pour les équipements d'une usine,
- un pour les automates.

Je souhaite faire le choix d'un équipement sur le premier formulaire, grâce à une liste de choix et faire apparaître les automates qui composent cet équipement dans un autre formulaire; j'ai déja essayé plusieurs solutions mais sans succes la dernière étant :

Code :

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

1
2
3
4
5
6
Private Sub Liste_Equipement_Change()
    If (Liste_Equipement.Value <> "") Then
         Forms!Environnement!Liste_Api.RowSource = "Select Api.Api_Id, Api.Api_Nom, Api.Api_Marque, Api.Api_Type FROM Equipement, Api WHERE Api.Equipement_Id=Equipement.Equipement_Id AND Equipement_Id=" & Liste_Equipement.Value & ";"
        Liste_Equipement.Requery
    End If
End Sub

Je ne comprend pas comment mettre en relation la liste déroulante du premier formulaire avec la liste de choix du deuxième formulaire

De l'aide SVP!!!! Merci d'avance à tous

[argyronet]

Bonjour,

Ta ListeA possède un RowSource.
Quand tu choisi une valeur, elle retourne celle de la 1ère colonne (0)
De la avec un AfterUpdate() tu stockes la valeur dans une variable et tu construits une chaîne SQL avec la condition WHERE idoine qui va devenir le RowSource de la seconde liste.

Par exemple :

Code :

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

SQL="SELECT Champ1, Champ2 FROM TableA WHERE Champ1= " & Me!ListeA

Ensuite tu écris

Code :

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

ListeB.RowSource=SQL

Argy