Hallo,
ich habe eine tabelle mit einträgen, aus denen die doppelten herausgefiltert werden sollen, aber im gegensatz zu den lösungsansätzen (spezialfiler - keine duplikat) sollen diese doppelten spalten ausblendet werden.
wobei bspw. zeile 2 und 3 ungleich 4 aber zb. 6 gleich 7. und somit soll spalte 6 und 7 gelöscht / ausgeblendet werden.
wäre super wenn hier jemand einen antwort hat oder einen verweis auf diese bereits gestellte frage hat.
vielen dank
Office - Word, Excel und Co. 9.704 Themen, 40.847 Beiträge
Ich gehe davon aus, das die Daten in der Spalte von oben nach unten sortiert untereinander stehen.
Kennst du Dich mit VB aus?
Dann füge dies ein:
Sub Makro1()
ActiveCell.Offset(1, 0).Select
Do
If ActiveCell = ActiveCell.Offset(-1, 0) Then ActiveCell.EntireRow.Hidden = True
ActiveCell.Offset(1, 0).Select
Loop Until ActiveCell = ""
End Sub
Platziere den Cursor auf das erste Datenfeld in einer Spalte und starte das Macro, die doppelten Zeilen werden ausgeblendet.
Zum Einblenden folgenden Code verwenden:
Sub Makro2()
Cells.Select
Selection.EntireRow.Hidden = False
ActiveCell.Select
End Sub
Wie immer gilt: Keine Gewähr ;-) Probier es vorher mit einer Kopie der Datei aus!
Gruß