Discussion :

[etoileetoile]

Bonjour,

J'ai 2 tables, une table médecins et une table laboratoires

Occurrence de la table médecins, 2 propriétés : nom du médecin et prénom du médecin
nom med 1 prénom med 1
nom med 2 prénom med 2
nom med 3 prénom med 3
Occurrence de la table laboratoires :nom du laboratoire
nom Lab 1
nom Lab 2
nom Lab 3

je souhaite parvenir à ce résultat et est-ce possible ?

Le contenu de la zone de liste modifiable doit comprendre les occurrences
de la table médecins et de la table laboratoires.

Contenu de la zone de liste mod

nom med 1 prénom med 1
nom med 2 prénom med 2
nom med 3 prénom med 3
nom Lab 1
nom Lab 2
nom Lab 3

Avec mes remerciements

[GillesDeVuif]

Bonjour.
Peut-être comme ça :

Code :

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

1
2
3
4
5
6
SQL = "SELECT DISTINCT (TableMedecins.Nom & " " & TableMedecins.Prenom) AS NomMedecin, TableLaboratoire.NomLab FROM TableMedecins, TableLaboratoire"
 
With Me.TaZoneDeListe
    .Rowsource = SQL
    .Requery
End With

Cordialement.

[etoileetoile]

Je vous remercie pour la rapidité de votre réponse.

Toutefois l'affichage se fait sur 2 colonnes.

Med 1 Lab 1
Med 2 Lab 1
et ainsi de suite

Je souhaiterai que l'affichage se fasse sur une seule colonne.

Med 1
Med 2
Med 3
Labo 1
Labo 2

Avec mes remerciements,

Cordialement

[GillesDeVuif]

Oui, désolé : peut-être comme ça :

Code :

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

1
2
3
4
5
6
7
8
9
SQL = "SELECT DISTINCT (TableMedecins.Nom & " " & TableMedecins.Prenom) AS ContenuListe INTO TblTemp FROM TableMedecins"
Currentdb.execute (SQL)
SQL = "INSERT INTO TblTemp (ContenuListe) SELECT DISTINCT NomLab FROM TableLaboratoire"
Currentdb.execute (SQL)
 
With Me.TaZoneDeListe
    .Rowsource = SQL
    .Requery
End With

(à un moment, il faudra faire un DROP de TblTemp).

Cordialement.

[lvz00]

Salut

Une simple requête union ne marcherait-elle-pas ???

Code :

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

1
2
3
4
5
6
 
SELECT Distinct NomMedecin FROM TableMedecin 
 
UNION 
 
SELECT Distinct NomLabo FROM TableLabo

[etoileetoile]

Salut

Une simple requête union ne marcherait-elle-pas ???

Code :

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

1
2
3
4
5
6
 
SELECT Distinct NomMedecin FROM TableMedecin 
 
UNION 
 
SELECT Distinct NomLabo FROM TableLabo

Celà marche parfaitement.

Une toute dernière question : est-il possible de faire un tri par ordre alphabétique du contenu de la liste ?

Merci

[lvz00]

Après vérification, le code ci-dessus est inexact: l'opérateur "UNION" dédoublonne et ordonne.

Voir http://access.developpez.com/faq/?page=Concept#UNIONALL
Donc les Distincts sont inutiles dans la formule.

Pour le tri, il se fait par défaut, on peut le modifier en posant un Order by sur un des champs (voir le petit exemple joint).