Office: Tabellen vergleichen bzw. Tabellenabgleich

Hallo,

ich habe immer wieder das Problem, dass ich große Datenmengen abgeichen muss.

Ich habe Access 97 und möchte 2 Tabellen über alle Felder miteinander vergleichen.

Am einfachsten wäre eine Lösung, die dem "minus" SQL Befehl entspricht. Doch leider kennt Access diesen Befehl nicht.

Gibt es hierfür eine komfortable Lösung?


Vielen Dank!

:)

 

Was genau möchtest Du den vergleichen.

Insofern Du die DS selektieren möchtest die in A und und nicht in B vorkommen:
Code:

 

Vergleichen möchte ich alle Felder von Tabelle A mit allen Feldern von Tabelle B.

Beispiel:

Tabelle A
Feld1 Feld2 Feld3
A 11 111
B 22 222
B 22 111

Tabelle B
Feld1 Feld2 Feld3
A 11 111
B 22 223
B 22 111

Im Ergebnis der Abfrage müsste der zweite Datensatz angezeigt werden.

Das eigentliche Problem ist, dass ich nicht von dem Schlüsselfeld ausgehen kann bzw. kein eindeutiges Schlüsselfeld existiert. Die Datensätze sind erst durch die Kombination mehrerer bzw. aller Felder eindeutig. Im Beispiel würde sich das Schlüsselfeld aus allen 3 Feldern ergeben.

Im Access kann ich natürlich auch so ein Schlüsselfeld bilden und in einer zweiten Abfrage die Differenzen über das berechnete Schlüsselfeld (mit left Join und "ist Null") ermitteln. Das Problem hierbei ist jedoch, dass bei großen Datenmengen Access überfordert ist und kein Ergbenis mehr liefert.

 

Hallo
möchtest Du die Duplikate Suchen?
Neue Abfrage erstellen und Abfrage-Assistent für Duplikate wählen.
Hoffe das hilft Dir.
Gruss
Ruedi

 

versuche es mal mit

 

Vielen Dank für eure schnelle Hilfe!!!

Insbesondere der Vorschlag von Nouba trifft den Kern meines Problems. Er würde es auch lösen. Aber...

Diese vorgehensweise hatte ich auch schon mal getestet und mir sind viele Datensätze als Differenz angezeigt wurden, obwohl keine Differenz vorhanden ist. Ich bin der Sache auf den Grund gegangen und habe festgestellet, dass diese Abfrage nur funktioniert wenn keine "Leer" - Felder vorhanden sind.

Beispiel:

Tabelle A
Feld1 Feld2 Feld3
A 11 111
B 22 222
B 22

Tabelle B
Feld1 Feld2 Feld3
A 11 111
B 22 222
B 22

Bringt mit der Abfrage den dritten Datensatz als Differenz. Es besteht aber keine.

Vielen Dank für Eure supergute Unterstützung.

 

Hallo
Hast Du es einmal mit UNION abfrage versucht, Bringt nicht die Doppelten
aber alle DS die in beinen Tabellen sind werden nur einmal gezeigt.
Code:

 

Hallo...
versuch es mal mit dem nachfolgenden Code

Public Function DokCheck(Tab1$, Tab2$) As Long
Dim strsql$, namse$
Dim i As Integer
Dim dbsCur As DAO.Database
Dim tdfCur As DAO.TableDef
On Error Resume Next

strsql = "SELECT " & Tab1 & ".* FROM " & Tab1 & " INNER JOIN " & Tab2 & " ON " & Tab1 & ".Primer = " & Tab2 & ".Primer WHERE ("
Set dbsCur = CurrentDb
Set tdfCur = dbsCur.TableDefs(Tab2)
'Felder auslesen
For i = 1 To tdfCur.Fields.Count - 1
namse = tdfCur.Fields(i).Name
If i = 1 Then
strsql = strsql + "(" & Tab2 & ".[" + namse + "] " & Tab1 & ".[" + namse + "])"
Else
strsql = strsql + " OR (" & Tab2 & ".[" + namse + "] " & Tab1 & ".[" + namse + "])"
End If
Next i
strsql = strsql + ");"
Set rs = CurrentDb.OpenRecordset(strsql)
If Not rs.EOF Then
rs.MoveFirst
rs.MoveLast
DokCheck = rs.RecordCount
End If
rs.Close
End Function

rs ist dann das gewünschte Recordset mit den geänderten Datensätzen. Ich brauchte nur die Anzahl.

vG

 

Das Thema ist ja nur 8 Jahre alt *biggrin.gif*