hallo!
eine frage:
ich habe eine tabelle/liste bsp:
birne
apfel
banane
apfel
birne
ist es möglich eine neue tabelle/liste automatisch zu erstellen, die jedes element der gegebenen liste nur EINMAL aufführt? in diesem beispiel wäre das dann
birne
apfel
banane
vielleicht kennt ja jemand einen trick…
grüße
GOgannes
Doppelte einer Liste ausfiltern
ist es möglich eine neue tabelle/liste automatisch zu
erstellen, die jedes element der gegebenen liste nur EINMAL
aufführt? in diesem beispiel wäre das dann
birne
apfel
banane
Hallo Go,
gib dir bitte mal mehr bzw. überhaupt Mühe mit einem passenden Betreff.
Zu deinem Problem, sicher u.a. mit Daten-Filter-Spezialfilter zu lösen.
Gruß
Reinhard
Hallo GOganes,
Spalte (muß eine Überschrift haben) markieren,
Daten > Filter > Spezialfilter > Häkchen bei „Keine Duplikate“
Gruß Fritz
Ich möchte mich bei euch beiden recht herzlich bedanken!
Ihr habt mir mit eurem Wissen weitergehofen! =)
Allerdings bin ich noch nicht ganz am Ende. Ich glaube zwar nicht, dass es geht aber:
Wenn ich in der ersten Tabelle noch den Eintrag „Kiwi“ hinzufüge, wird er ja nicht automatisch in der zweiten Tabelle eingefügt. Ich muss den Filter wieder neu anwenden und im schlimmsten Fall auch einstellen.
Gibt es eine Weg dies zu automatisieren?
Viele Dank schon jetzt
GOgannes
Wenn ich in der ersten Tabelle noch den Eintrag „Kiwi“
hinzufüge, wird er ja nicht automatisch in der zweiten Tabelle
eingefügt. Ich muss den Filter wieder neu anwenden und im
schlimmsten Fall auch einstellen.
Gibt es eine Weg dies zu automatisieren?
Hallo Gogannes,
Rechtsklick unten auf den Blattnamen, „Code anzeigen“, Code reinkopieren, Listenbereich A:A und Zielzelle e1 anpassen im Code, Editor schliessen.
Auch die 1 in Columns(1) muß ggfs. angepasst werden, 1=A,2=B,3=C,usw.
Private Sub Worksheet\_Change(ByVal Target As Range)
If Not Intersect(Target, Columns(1)) Is Nothing Then
Range("A:A").AdvancedFilter Action:=xlFilterCopy, \_
CopyToRange:=Range("E1"), Unique:=True
End If
End Sub
Gruß
Reinhard
Danke Reinhard!
Jetzt ergibt sich nur noch das Problem, dass ich wenn ich in der Spalte einen Wert ändere, diese Änderung nicht mehr rückgängig machen kann. (So wie ich es sehe, liegt es daran, dass nach dem Ausführen des Makros direkt gespeichert wird…)
Ich gehe davon aus, dass ich damit leben muss (kann).
Vielen Dank nochmals
GOgannes