Spezialfilter per VBA, Ergebnisgröße feststellen
Wolfgang
ich erstelle per VBA einen Advanced Filter. Funktioniert wunderbar.
Das Ergebnis wird ab Zelle A23 eingeblendet.
Sub test()
Dim rng As Range
Set rng = Range("A7:D19")
rng.AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("A23"), CriteriaRange:=Range(" _
A1:D2")
End Sub
geworden ist (in etwa so: set rng=Range(Ergebnisliste).
(Das Ende der Liste ist bei mir nicht die letzte Zelle im Sheet)
Wie kann ich den Bereich der Ergebnisliste feststellen?
Gruß
Wolfgam