So vergleichen Sie Daten in zwei Spalten, um Duplikate in Excel zu finden
Sie können die folgenden Methoden verwenden, um Daten in zwei Microsoft Excel-Arbeitsblattspalten zu vergleichen und doppelte Einträge zu finden.
Methode 1: Verwenden Sie eine Arbeitsblattformel
Excel starten.
Geben Sie in einem neuen Arbeitsblatt beispielhaft folgende Daten ein (Spalte B leer lassen):
EIN
B
C
1
1
3
2
2
5
3
3
8
4
4
2
5
5
0
Geben Sie die folgende Formel in Zelle B1 ein:
=IF(ISTFEHLER(VERGLEICH(A1,$C$1:$C$5,0)),"",A1)Markieren Sie die Zellen B1 bis B5.
Wählen Sie in Excel 2007 und höheren Versionen von Excel in der Gruppe Bearbeiten die Option Ausfüllen und dann Nach unten aus.
Die doppelten Nummern werden in Spalte B angezeigt, wie im folgenden Beispiel:EIN
B
C
1
1
3
2
2
2
5
3
3
3
8
4
4
2
5
5
5
0
Methode 2: Verwenden Sie ein Visual Basic-Makro
Warnung: Microsoft stellt Programmierbeispiele nur zur Veranschaulichung bereit, ohne ausdrückliche oder stillschweigende Gewährleistung. Dies umfasst unter anderem stillschweigende Gewährleistungen der Marktgängigkeit oder Eignung für einen bestimmten Zweck. In diesem Artikel wird davon ausgegangen, dass Sie mit der demonstrierten Programmiersprache und den Tools vertraut sind, die zum Erstellen und Debuggen von Prozeduren verwendet werden. Microsoft-Supporttechniker können helfen, die Funktionalität eines bestimmten Verfahrens zu erläutern. Sie werden diese Beispiele jedoch nicht ändern, um zusätzliche Funktionen bereitzustellen oder Verfahren zu erstellen, die Ihren spezifischen Anforderungen entsprechen.
Führen Sie die Schritte im folgenden Beispiel aus, um ein Visual Basic-Makro zum Vergleichen der Daten in zwei Spalten zu verwenden:
Excel starten.
Drücken Sie ALT+F11, um den Visual Basic-Editor zu starten.
Wählen Sie im Menü Einfügen die Option Modul aus.
Tragen Sie in einem Modulblatt folgenden Code ein:
Unter Find_Matches() Dim CompareRange As Variant, x As Variant, y As Variant ' CompareRange gleich dem gewünschten Bereich setzen ' Auswahl vergleichen. Setze CompareRange = Range("C1:C5") ' HINWEIS: Wenn sich der Vergleichsbereich in einer anderen Arbeitsmappe befindet ' oder Arbeitsblatt verwenden Sie die folgende Syntax. ' Setze CompareRange = Workbooks("Book2"). _ ' Arbeitsblätter("Blatt2").Range("C1:C5") ' ' Jede Zelle in der Auswahl durchlaufen und vergleichen ' jede Zelle in CompareRange. Für jedes x in der Auswahl Für jedes y in CompareRange Wenn x = y dann x.Offset(0, 1) = x Nächstes J Nächstes x End SubDrücken Sie ALT+F11, um zu Excel zurückzukehren.
Geben Sie als Beispiel folgende Daten ein (Spalte B leer lassen):
EIN
B
C
1
1
3
2
2
5
3
3
8
4
4
2
5
5
0
Markieren Sie die Zellen A1 bis A5.
Wählen Sie in Excel 2007 und höheren Versionen von Excel die Registerkarte Entwickler und dann Makros in der Gruppe Code aus.
Hinweis: Wenn Sie den Entwickler -Tab nicht sehen, müssen Sie ihn möglicherweise aktivieren. Wählen Sie dazu Datei > Optionen > Menüband anpassen und dann im Anpassungsfeld auf der rechten Seite die Registerkarte Entwickler aus.
Klicken Sie auf Find_Matches und dann auf Ausführen .
Die doppelten Nummern werden in Spalte B angezeigt. Die übereinstimmenden Nummern werden neben die erste Spalte gesetzt, wie hier dargestellt:EIN
B
C
1
1
3
2
2
2
5
3
3
3
8
4
4
2
5
5
5
0
No comments:
Post a Comment