Table1 moins Table2

**helenafr** · 26/04/2006, 11h44

Bonjour,

je voudrais demander comment réaliser "Table1 - Table2" en VBA s'il vous plait? (en fait les 2 tables ont la meme structure et table2 est une partie de table1)
le code suivant ne marche pas à cause de l'erreur d'exécution 3131: erreur de syntaxe dans la clause FROM
Merci d'avance!

Sub except()

Dim DB As DAO.Database
Dim RS1 As DAO.Recordset
Dim RS2 As DAO.Recordset
Set DB = Application.CurrentDb
Dim SQLList1 As String
Dim SQLList2 As String

Set RS1 = DB.OpenRecordset("Table1", dbOpenDynaset)
Set RS2 = DB.OpenRecordset("Table2", dbOpenDynaset)

SQLList1 = "SELECT * FROM [Table1]"
SQLList2 = "SELECT * FROM [Table2]"
SQLList2 = SQLList1 & " EXCEPT " & SQLList2 & ";"
DB.Execute SQLList2
End Sub

**boubignole** · 26/04/2006, 11h57

Salut

Suis pas trop sur mais ça ressemble à une requete de non correspondance.
Essaye avec l'assistant pour voir

**helenafr** · 26/04/2006, 13h30

désolée je n'ai pas compris...

**boubignole** · 26/04/2006, 14h34

Si j'ai bien compris tu veux tous les enreg de table1 qui ne sont pas dans table2, c'est ça ?

ça donne un truc du genre :

Code :

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

1
2
3
SELECT idtable1, idtable2
FROM Table1 LEFT JOIN Table2 ON idtable1 = idtable2
WHERE idtable2 Is Null;

**helenafr** · 26/04/2006, 17h20

en fait ce que je veux est tres simple. par exemple:
Table1:

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
Champ1 Champ2
aa        a
bb        b
cc        c
dd        d
ee        e
 
Table2:
Champ1 Champ2
bb        b
cc        c
 
le objectif est pour obtenir "Table1-Table2":
Champ1 Champ2
aa        a
dd        d
ee        e

**Arkham46** · 26/04/2006, 17h21

slt,

tu cliques "nouvelle requête" et dans les assistants tu choisis "requête de non correspondance", non?

**pc75** · 27/04/2006, 08h46

Bonjour,

Tu peux utiliser ça :

Code :

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

1
2
 
select champ1, champ2 from table1 where champ1 + champ2 not in (select champ1 + champ2 from table2)

**helenafr** · 28/04/2006, 11h17

Salut Arkham46,
malheureusement, dans les assistants je ne peux pas choisir "requête de non correspondance", il faut réinstaller Access, mais c'est pas possible maintenant...

Salut, pc75
j'ai déjà essayé "where not in", mais c'est toujours la même erreur...

je voudrais demander s'il y un autre moyen, STP?
merci!

**pc75** · 28/04/2006, 11h36

Re,

Montre nous la dernière version de ta requête stp.

**helenafr** · 28/04/2006, 14h27

SELECT * FROM Table1
WHERE Table1.champ1 NOT IN
(SELECT Table2.champ1 FROM Table2)

**Caroline1** · 28/04/2006, 14h35

+1 pour pc75. J'aurais suggéré la même chose.

Elle te renvoie quoi ta dernière requête?
-Tu as des clés primaires sur tes tables? Essaie aussi de détailler tes champs plutôt que d'utiliser *. Je ne pense pas que ce soit le problème mais ça peut simplifier le débuggage.

-Pour une erreur de de syntaxe : est-ce que les deux champs ont exactement la même définition? Type de champ, même longeur si c'est des string...

Caroline

**boubignole** · 28/04/2006, 14h39

Essaye

Code :

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

1
2
3
4
 
SELECT Table1.Champ1, Table2.Champ2
FROM Table1 LEFT JOIN Table2 ON Table1.Champ1= Table2.Champ1
WHERE Table2.Champ1 Is Null;

c'est le code d'un requete de non correspondance...

**helenafr** · 28/04/2006, 15h51

Merci bp, c'est bon maintenant!!

**Caroline1** · 28/04/2006, 15h52

N'oublie pas le tag Résolu :-)
En haut : Outils de la discussion -> Résolu

Table1 moins Table2

Access

Discussions similaires

Partager

Partager