referenzieren
09.07.2008 15:33:41
Yusuf
hab mir ein Tipp der letzten Tage mal zu Herzen genommen und versuche .select und .activate zu vermeiden.
Hier komme ich leider nicht weiter.
Es ist ein Spezialfilter
Workbooks("TopAuswertungIntern.xls").Sheets("ablage").Range(Cells(1, 1), _
Cells(ende,1)).AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _
Workbooks("TopAuswertungIntern.xls").Sheets("ablage").Range(Cells(1, 2), Cells(ende, 2)), _ CopyToRange:=cells(1, 4), Unique:=True
Vielen Dank im voraus
Gruß
Yusuf