Office: (Office 2007) Anzahl Ergebnisse aus AutoFilter

Guten Tag allerseits!

Gibt es eine Möglichkeit die Anzahl Ergebnisse einer AutoFilter-Filtrierung mit VBA abzufragen? Ein True oder False würde mir auch schon reichen.

Ich würde gerne prüfen, ob nach dem Anwenden des AutoFilters überhaupt noch eine Zeile aus der Liste vorhanden ist, da mein Code sonst die gesamte Liste markiert und weiterverarbeitet.

Liebe Grüsse *Smilie
devencer

:)

 

Hi devencer,

hier eine Möglichkeit:
Code:

 

Hi R J

Vielen Dank für deine Antwort!

Konnte deinen Code bisher nicht einbauen. Bin noch neu in Sachen VBA.

Versucht habe ich die Ermittlung der Anzahl Zeilen mit folgendem Befehl:

LastRowAfterFilterTab1 = .UsedRange.Rows.Count

Leider erhält die Variable auf diese Weise den Wert der gesamten Liste zurück, was ich eben nicht möchte. Wie erhalte ich die Anzahl Zeilen einer gefilterten Liste exkl. ausgeblendete Zeilen?

Vielen Dank schonmal!



edit:
Habe nun zwei ANZAHL2-Hilfsfelder eingebaut, welche ich als Bedingung in einer For-Schleife prüfe. Wenn der eine Wert kleiner ist als der andere, dann wird die Schleife ausgeführt. Die andere Spalte wird in der Schleife mit dem aktuellen Datum des Makro-Aufrufes gefüllt. Wenn das Makro zu einem späteren Zeitpunkt aufgerufen wird, entspricht der Datensatz nicht mehr den Kriterien des AutoFilters, weil in der zweiten Hilfsspalte das Datum eingetragen wurde. Für den erfahrenen VBA-Programmierer vielleicht etwas unschön, aber für einen Anfänger wie mich ausreichend *wink.gif*

Liebe Grüsse *Smilie
devencer

 

...heißt das jetzt, Problem erledigt?

 

Ja, habe mein Problem lösen können. Habe aber noch eine Frage zu deinem Code: Wozu ist das "x#" bei der Variablendeklaration gut? "x" ist ja der Zähler, aber was bewirkt das "#"? Deklariert man so eine Variable vom Typ Integer?

 

....nein. Die Raute steht für den Datentyp Double. Für Integer steht das Prozentzeichen.

 

Danke für den Hinweis!

Gute Nacht!

Gruss
devencer