Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
804to808
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
804to808
804to808
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Werte nur einfach aufzählen

Werte nur einfach aufzählen
02.10.2006 17:46:47
petra
Hallo zusammen,
hab mal wieder ein makro problem:
und zwar möchte ich aus Spalte L (ab L3) mit vielen unterschiedlichen und gleichen Werten eine Liste in Spalte N (ab N3) auflisten, in denen die Werte aus L nur einmal vorkommen.
hab nun nen makro der irgendwann auch mal funktioniert hat. aber irgendwie klappt es jetzt nicht mehr. Kann mir jemand weiterhelfen, den makro wieder in gang zu kriegen?
Hier der Makro:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Ziel As Range
If Cells(1, Target.Column).Value <> "xxx1" Then Exit Sub
If Application.WorksheetFunction.CountIf(Rows(1), "xxx2") <> 1 Then
MsgBox ("Kein Eindeutiger Zielbereich vorhanden ('xxx2' in Reihe 1)")
Exit Sub
End If
Set Ziel = Rows(1).Find(what:="xxx2").Offset(1, 0)
Range(Cells(2, Target.Column), Cells(2, Target.Column).End(xlDown)).AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Ziel, Unique:=True
End Sub

danke für hilfe
lg
petra

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Werte nur einfach aufzählen
02.10.2006 18:02:36
Jan3
Hi Petra,
Stell mal ein Beispiel ins Forum.
Jan
AW: Werte nur einfach aufzählen
02.10.2006 18:03:47
petra
hat sich geklärt.
hab das problem gelöst.
Trotzdem danke.
lg
petra
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige