Gruppen

Top Gruppen: Windows 7; Windows Vista; Windows XP; Textverarbeitung; Excel; DSL; Internet Browser; E-Mail/Outlook
Betriebsysteme: Windows classik; Linux; BS-Sonstige
Software: Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; SW-Sonstige
Hardware: Mainboard/CPU; Grafikkarten; Peripherie; Laptop/Notebook; HW-Sonstiges
Netzwerk: Telefon,ISDN,Modem; W-Lan; NW-Sonstiges
Programmierung: PHP,ASP,Perl...; Java,C++...; Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke; SN Intern; Test

/ Forum / Tabellenkalkulation

Tabellenkalkulation

Fragevon poedi2 vom 17.04.2020, 11:33 Options

Daten Bereinigen

Hallo,

ich habe folgendes Problem:

2 Excel Tabellen wurden zusammengeführt und beeinhalten nun doppelte Daten: d.h. z.B gleicher Auftrag/gleicher Kunde/aber Bemerkungen

Auftragsnummer Kunde Bemerkungen
1. A
1. A TEST
2. B
2. B TEST

Nun möchte ich doppelten Aufträge entfernen lassen, jedoch nur die ohne Bemerkungen oder eben beide Datensätze zusammenführen.
Ergebnis:
Auftragsnummer Kunde Bemerkungen
1. A j
2. B j

Bitte um HIlfe

Antwort schreiben

Antwort 1 von Saarbauer vom 17.04.2020, 12:28 Options

Hallo,

mit den Doppelten löschen ist kein Problem

Sub doppelte()
    letzteZeile = Range("A65536").End(xlUp).Row
    For i = 2 To letzteZeile - 1
            For j = i + 1 To letzteZeile
                 If Range("A" & i).Value = Range("A" & j).Value And Range("B" & i).Value = Range("B" & j).Value And Range("c" & j).Value = "" Then
                        Rows(j).Delete
                  End If
            Next j
    Next i
End Sub

geht mit dem Makro, aber was verstehst du unter zusammenführen?

Gruß

Helmut

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Tipp einschicken

News einschicken