Excel VBA
Hans
ich habe ein Problem mit der Ermittlung der Anzahl gefilterten Zeilen in Excel. Ich hoffe dass Ihr mir hierzu einen Tipp geben könnt.
Ich ermittle die Anzahl der gefilterten Zeilen mit der Funktion:
Anzahl_Zeilen =Intersect(Bereich.SpecialCells(xlVisible), Bereich.Columns(1)).Count - 1
Das Ganze funktioniert auch prima, solange die Anzahl der Zeilen unter ca. 34.000 Datensätzen bleibt. Habe ich plötzlich 50.000 Datensätze auszuwerten, erhalte ich eine Fehlermeldung mit einem merkwürdigen Hinweis, dass das Diagramm nicht erstellt werden kann ....
Der Datentyp für die Variable "Anzahl_Zeilen" ist Long (vorher Integer (ich dachte schon dass das die Fehlerursache ist).
Gibt es eine ähnliche Funktion die für gefilterte Zeilen in Frage kommt. Eine For Schleife kann ich nicht verwenden, weil diese zulange für die Ermittlung der gefilterten Zeilen brauch (ich verwende die Funktion mehrfach bzw. für verschiedene Operationen).
Für einen Tipp wäre ich sehr dankbar.
Bestens Hans