Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
340to344
340to344
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen zählen

Forumthread: Zeilen zählen

Zeilen zählen
23.11.2003 18:32:44
gerhard
Hallo,
Wie kann ich in einer Datenbank die Anzahl der gefilterten Datensätze
(Datensätze ab Zeile B3) in der Zelle E2 sowie in der Statuszeile via VBA anzeigen lassen?

Vielen Dank
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen zählen
23.11.2003 18:49:05
Nepumuk
Hallo Gerhard,
so geht's:


Option Explicit
Public Sub zaehlen()
Dim lngZeile As Long, lngZaehler As Long
For lngZeile = 3 To Cells(65536, 2).End(xlUp).Row
If Not Rows(lngZeile).Hidden Then lngZaehler = lngZaehler + 1
Next
Cells(2, 5) = lngZaehler
Application.StatusBar = CStr(lngZaehler) & " gefilterte Datensätze"
End Sub
Public Sub reset()
Application.StatusBar = False
End Sub


Code eingefügt mit: Excel Code Jeanie

Gruß
Nepumuk
Anzeige
AW: Zeilen zählen
24.11.2003 14:11:36
Gerhard
Wie bekomme ich dieses Marko zum laufen?
Wo muß ich es hineinkopieren?
Wie muß ich es ansprechen?

Gruß
Gerhard
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige