Discussion :

[Maxim0]

Bonjour,

J'ai fait une macro en vba qui importe des données( colonne:plaque et colonne :statut) contant d'une base access vers mon fichier excel,par ailleur je ne trouve comment faire une jointure sur une autre table de la même base access pour récuprer la colonne région.

Merci d'avance
Cordialement,
voici le code :

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
18
19
Sub Bouton23_Clic()
 
    Dim Db As DAO.Database
    Dim Rs As DAO.Recordset
    Dim strSQL As String
    Dim strSQL1 As String
 
    Set Db = DAO.OpenDatabase("p:\document\Gateway OPTIM 3G\Gateway OPTIM 3G.mdb", False, False)
    strSQL = "SELECT Plaque,Statut FROM [Statut Plaques] "
    strSQL1 = "SELECT Plaque FROM [REFERENTIEL SUIVI OPTIM PLAQUE] "
 
    Set Rs = Db.OpenRecordset(strSQL, DAO.dbOpenSnapshot)
 
   Feuil3.Range("AC4").CopyFromRecordset Rs
 
    Db.Close
 
 
End Sub

[helas]

Bonjour,

Créer la requête sous Access avec une jointure à gauche et récupérer le code SQL pour l'inclure dans le code Excel
le code pourrait ressembler à

Code :

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

1
2
 
SELECT Table1.a, Table1.b, Table2.region FROM Table1 LEFT JOIN Table2 ON Table1.a = Table2.d;

jointure entre table1.a et table2.d pour récupérer le champ region de la table 2