Hi Leute,
Mit folgendem Code filtere ich mir aus ein er Liste jedes Datum nur einmal:
rng_z.AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=rng_z, CopyToRange:=Sheets(DSN).Range("G2") _
, Unique:=True
Jetzt bringt er mir den obersten Datensatz immer doppelt, vermutlich , weil er denkt das wär die Überschrift. Ich habe mir geholfen indem ich kurzfriszig eine Überschrift hinmache und dann wieder lösche, aber gibt es hier evtl. auch so was wie bei der Sort-Methode
Header:=xlNo ?
mfg
Ingo Christiansen