PDA

Vollständige Version anzeigen : Doppelte Datensätze finden,hierbei mehrere Felder vergleichen


roedel
03.01.2002, 10:55
Hallo zusammen,

versuche in einer Tabelle Doppelte Datensätze zu finden.
Hierbei müssen allerdings mehrere Felder miteinander verglichen werden.
Also etwa: Feld1 mit Feld 1 und Feld 2 und Feld3 und Feld 4.

Assistent zur Duplikatssuche vergleicht leider nur Identische Felder.

<Anko>
03.01.2002, 12:31
Ich weiß nur, das man mit DistinctRow doppelte Datensätze eliminieren kann und Distinct doppelte Datensätze unterdrückt!

roedel
04.01.2002, 09:05
Hiiiiiiiiiilfäää!

Andorxor
04.01.2002, 09:35
Schritt 1:
Folgenden Code in ein Modul

Public Function test(w As Variant, t As String) As Long

Dim r As recordset
Dim x As Field

Set r = CurrentDb.OpenRecordset(t)
While r.EOF = False
For Each x In r.Fields
If x.Value = w Then
test = test + 1
End If
r.MoveNext
Wend
End Function


2.Eine Abfrage mit folgenden Sql erstellen

"SELECT test([TabellemitFeld1]![Feld1],"SELECT Feld2, Feld3,Feld1 FROM TabelleMitFeld2Feld3Feld1") AS Anzahl ,Feld1 from TabellemitFeld1

Diese Funktion sollte Zählen wie oft Feld 1 in der Abfrage im zweiten Teil der Funktion vorkommt.
Wenn du Feld1 mit der Gesamten Tabelle vergleichen willst reicht auch der Tabellenname.