Supportnet Computer
Planet of Tech

Supportnet / Forum / Datenbanken

A97: Doppelte Datensätze mittels Abfrage löschen





Frage

Hi, wie kann mittels Abfrage doppelte Datensätze löschen?. Das Doppelt bezieht sich aus Zuname, Vorname und Strasse, die anderen Felder werden nicht berücksichtigt. Wenn also z.B. der gleiche Zuname, Vorname und die Strasse 50 mal vorhanden ist, soll sie nur einmal übrigbleiben. Ich könnte natürlich auch mit VBA durchrennen, aber es können duchaus 15.000 Datensätze sein und das dauert relativ lange. Freue mich über jeden Tipp Gruß Herbert

Antwort 1 von Eisbear

Habe ein Tool, kann ich aber hier nicht anhängen?

übermittle deine Mail Adresse

Gruß

Eisbear

Antwort 2 von Herbert

Hallo Eisbear,
vielen Dank für Dein Angebot.
Vorerst habe ich das Problem gelöst indem ich Vorname+Zuname+Strasse mit Hausnummer mittels Aktualisierungsabfrage in ein Feld SonderKey gepackt habe und dann mit Sortierung auf SonderKey nachfolgende Prozedur ausführe.

TextBuffer = "XYZ"
Do Until Rst1.EOF
         If Rst1!SonderKey = TextBuffer Then
            Rst1.Delete
         Else
            TextBuffer = Rst1!SonderKey
         End If
         
         Rst1.MoveNext
Loop 


Auf meinem Entwicklungsrechner brauche ich für vorher = 6000 Datensätze, nachher = 2340 Datendätze nur 2 Sekunden.
Da ich aber noch nicht weiß wie sich das Netzwerk auf die Zeit auswirkt, würde mich Dein Tool, falls es nicht Blackbox interessieren.
Danke für Deine Mühe,
Gruß Herbert
heine10623@web.de