2016-09-09 7 views
0

Ich habe eine Frage zu Arrays. Lassen Sie mich zuerst Sie den Code zeigen, dass ich bekommen haben:entfernen doppelte Zeilen im Array

Dim TopStud() As Variant 

TopStud = Range("A1", Range("A2").End(xlDown).End(xlToRight)) 
'code that removes duplicate values in array 

'end code 
Worksheets.Add 

Range(ActiveCell, ActiveCell.Offset(UBound(TopStud, 1) - 1, UBound(TopStud, 2) - 1)).Value = TopStud 

Der obige Code zeigt, wie ich eine Reihe von Werten in einem Array erhalten. Ich möchte doppelte Werte, die in diesem Array gespeichert wurden, in ein neues Arbeitsblatt löschen. Siehe oben. Gibt es eine einfache Möglichkeit, dies zu tun?

Ich möchte folgendes Ergebnis: enter image description here

+4

Nachdem Sie die Werte setzen In den Zellen können Sie RemoveDuplicates verwenden. Es gibt viele Tutorials da draußen und eine einfache Suche nach 'Range.RemoveDuplicates' sollte sie für Sie bekommen. –

+1

Zeichnen Sie ein Makro auf, das das Entfernen von Duplikaten ausführt, um zu sehen, wie ... Markieren Sie die Datenregisterkarten, markieren Sie die Spalten A: D und wählen Sie dann die Duplikate oberhalb von Spalte K aus. Ich verwende diesen Ansatz oft, wenn ich den VBA-Code für etwas nicht weiß, das über Menüs verfügbar ist. – xQbert

Antwort

1

Wenn Sie den gesamten Datensatz für alle Duplikate in der aktuellen Spalte entfernen möchten:

Cells.RemoveDuplicates Columns:=ActiveCell.Column,Header:=xlYes

enter image description here

+0

Es war nicht nur die eine Spalte, sondern die ganze Platte. Es wäre besser, den vollen Bereich zu verwenden und Duplikate basierend auf Spalte 1 zu entfernen. Der gesamte Datensatz 6246, Calvin, Bakker ist das Duplikat entfernt. –

+0

@ScottCraner Danke, ich hätte schwören können, dass ich das überprüft habe. –

+0

@ScottCraner Netter Artikel, aber nein, es hat meine Meinung nicht geändert. Der Grund dafür ist, wenn Sie nach einer Zahl suchen, die als Text gespeichert ist, oder wenn eine Zeichenfolge, bei der es sich tatsächlich um eine Zahlenübereinstimmung handelt, fehlschlägt. Möglicherweise möchten Sie [EXCEL SVERWEIS VS INDEX MATCH VS SQL VS VBA] (http://analystcave.com/excel-vlookup-vs-index-match-vs-sql-performance/) –

Verwandte Themen