Discussion :

[rangernoir]

Salut tout le monde,

J'ai 2 zones de listes :

1) initiale de l'agent
2) nom du projet

J'aimerais que l'on clique sur l'initiale de l'agent, ensuite sur le nom du projet et enfin sur un bouton valider.

Une fois cliqué sur valider cela nous donnerai l'initiale de l'agent et tous les projets qui s'y rapporte.

Merci de votre aide

Rangernoir 8)

[marchand_de_sable]

Salut.

Heu, je comprends pas ce que tu veux...

Une fois cliqué sur valider cela nous donnerai l'initiale de l'agent et tous les projets qui s'y rapporte.

L'utilisateur saisit les initiales et valide pour voir les projets rapportés à l'agent ?

J'aimerais que l'on clique sur l'initiale de l'agent, ensuite sur le nom du projet et enfin sur un bouton valider.

Ou l'utilisateur saisit des initiales, choisit un projet s'y rapportant, et valide afin d'avoir des infos complémentaires ?

[rangernoir]

L'utilisateur clique sur les initiales de la zone de liste, ensuite clique sur le projet et enfin clique sur valider.

Alors là l'utilisateur aurait une fenêtre avec l'agent choisi et le projet ainsi que toutes les tâches se rapportant au projet.

Arff j'ai oublié de parler des tâches. Désolé en fait j'ai dans la table projet les tâches effectuées par l'agent pour un seul projet.

As-tu compris ce que je veux faire ?

Rangernoir 8)

[User]

Salut,

Suppose que tu as 1 sousform Tache_Agent (sur ton form principal) lié à une requête Tache_Agent:

et les 2 listes déroulantes: InitAgent et Projet

Tu mets le code suivant sur l'évènement click de ton bouton valider:

Code :

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

1
2
3
4
5
6
Private Sub Valider_Click()
 
Me!Tache_Agent.Form.RecordSource  = "Select * From Tache_Agent  Where ([InitAgent]=" & Chr(34) & Me!InitAgent & Chr(34) & " ) And ([Projet]=" & Chr(34) & Me!Projet & Chr(34) & " )"
 
 
End Sub

Il te faut aussi tester si les valeurs de tes listes sont nulles

[marchand_de_sable]

Re,

hé ben, pour ta zone de liste "initiales", il faut entrer une requête qui prend tes initiales dans la close "where" comme RowSource.
Exemple :

Code :

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

1
2
3
4
select projet from Tb_Projet inner join (Tb_Participation inner join   Tb_Agent on...) on ... 
'j'imagine que ça doit être un truc comme ça;
'enfin tu ajoute :
where Initiales_Agent=Formulaires!nom_du_form!liste_initiales

Sur l'évènement "OnClick" de ton bouton "valider", tu ouvres ton formulaires, ta page, ou je sais quoi, en fonction des valeurs de tes listes, comme dans la close "where" précèdente.

Ca te parle, ou ça te passe au-dessus de la tête ?

[marchand_de_sable]

ha, j'ai dégainé un peu tard

Mais avec tout ça, tu as une solution presque complète.
Suffit de mettre les bons nom de variables, formulaires, tables, etc.

Bon courage. ++

[rangernoir]

oui super !!

Merci à vous tous

Rangernoir 8)