Alle sichtbare zeilen zählen

Forumthread: Alle sichtbare zeilen zählen

08.10.2004 11:34:32

Markus

Hallo und guten Tag,
ich brauche bitte Eure Hilfe:
Ich habe in einer Tabelle eine unbestimmte Zahl von Einträgen
Jetzt möchte ich zählen wieviele Zeilen von der Gesamttabelle sichtbar sind.
Wie kann ich dies machen mit VBA
Es sollen aber nur gefüllte Zellen gezählt werden.
Danke schonmal
Markus

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Alle sichtbare zeilen zählen

08.10.2004 12:05:21

Matthias
bitte nochmal Hilfe....

08.10.2004 14:33:20

Markus
AW: bitte nochmal Hilfe....

ransi
Danke geht super...

11.10.2004 08:54:33

Markus
Freut mich wenns klappt...

ransi

AW: Alle sichtbare zeilen zählen

08.10.2004 12:05:21

Matthias

Hallo Markus,
was heißt sichtbar? Blendest du Teile mit Autofilter aus? dann so:
=TEILERGEBNIS(2;A:A)
Gruß Matthias

bitte nochmal Hilfe....

08.10.2004 14:33:20

Markus

nein ich blende Sie per Code aus
Klappt das da auch?
danke schonmal
Markus

AW: bitte nochmal Hilfe....

ransi

hallo markus
Mit Schleife:
Public


Sub sichtbare_zaehlen()
Dim l As Long
Dim zahl As Long
zahl = 0
For l = Range("a65536").End(xlUp).Row To 1 Step -1
If Rows(l).Hidden = False Then zahl = zahl + 1
Next
MsgBox zahl & " Zeilen im relevanten Bereich sind nicht ausgeblendet"
End Sub

ransi

Danke geht super...

11.10.2004 08:54:33

Markus

hast mir damit echt geholfen.
MFG
Markus

Freut mich wenns klappt...

ransi

hallo markus
danke für die rückmeldung
ransi

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um die Anzahl sichtbarer Zeilen in Excel zu zählen, kannst Du verschiedene Methoden anwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

Mit der Funktion TEILERGEBNIS:
- Wenn Du die Zeilen mit dem Autofilter ausgeblendet hast, kannst Du die folgende Formel verwenden:
```
=TEILERGEBNIS(2;A:A)
```
- Diese Formel zählt die sichtbaren Zeilen in der Spalte A.

Mit VBA:

Wenn Du Zeilen per Code ausblendest und nur die angezeigten Zeilen zählen möchtest, kannst Du folgendes VBA-Skript nutzen:

Sub sichtbare_zaehlen()
 Dim l As Long
 Dim zahl As Long
 zahl = 0
 For l = Range("A65536").End(xlUp).Row To 1 Step -1
     If Rows(l).Hidden = False Then zahl = zahl + 1
 Next
 MsgBox zahl & " Zeilen im relevanten Bereich sind nicht ausgeblendet"
End Sub

Dieses Skript zählt die nicht ausgeblendeten Zeilen in Deinem Arbeitsblatt.

Häufige Fehler und Lösungen

Fehler: Formel gibt falsche Ergebnisse zurück
- Lösung: Stelle sicher, dass Du die richtige Spalte in der TEILERGEBNIS-Formel angibst. Überprüfe auch, ob der Autofilter korrekt angewendet wurde.
Fehler: VBA-Skript funktioniert nicht
- Lösung: Überprüfe, ob Du den richtigen Bereich in der Schleife angegeben hast. Achte auch darauf, dass die Zeilen nicht manuell ausgeblendet sind, da dies die Ergebnisse beeinflussen kann.

Alternative Methoden

Pivot-Tabellen: Du kannst auch eine Pivot-Tabelle erstellen, um die Anzahl gefilterter Zeilen zu ermitteln. Ziehe die gewünschte Spalte in den Wertebereich und wähle „Anzahl“ aus.
Formel mit SUMMENPRODUKT: Eine weitere Möglichkeit besteht darin, die Anzahl sichtbarer Zellen zu zählen:
```
=SUMMENPRODUKT((A1:A100<>"")*(SUBTOTAL(103,OFFSET(A1:A100,ROW(A1:A100)-MIN(ROW(A1:A100)),0,1)))
```

Praktische Beispiele

Beispiel 1: Du hast eine Liste von Verkäufen in Spalte A und möchtest wissen, wie viele Verkäufe sichtbar sind. Verwende die TEILERGEBNIS-Formel:
```
=TEILERGEBNIS(2;A:A)
```
Beispiel 2: Du blendest Zeilen in einem Budgetplan per VBA aus und möchtest die sichtbaren Zeilen zählen:
```
Sub sichtbare_zaehlen()
  ' ... (Code wie oben)
End Sub
```

Tipps für Profis

Nutze Tastenkombinationen in VBA, um den Code schneller auszuführen.
Kombiniere die TEILERGEBNIS-Funktion mit anderen Funktionen, um komplexere Berechnungen durchzuführen, wie z.B. das Zählen von nur gefüllten Zellen.
Speichere Deine VBA-Codes in einem Modul, um sie wiederverwenden zu können.

FAQ: Häufige Fragen

1. Wie zähle ich nur gefilterte Zeilen in Excel?
Du kannst die TEILERGEBNIS-Formel verwenden, um nur die gefilterten Zeilen zu zählen. Wenn Du VBA verwendest, stelle sicher, dass Du nur die sichtbaren Zeilen in Deinem Code berücksichtigst.

2. Was mache ich, wenn die Formel nicht funktioniert?
Überprüfe Deine Filtereinstellungen und stelle sicher, dass Du die richtige Spalte in der Formel angibst. Manchmal kann es auch hilfreich sein, die Excel-Datei neu zu laden.

Beliebteste Forumthreads (12 Monate)

Forumthread: Alle sichtbare zeilen zählen

5 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Sichtbare Zeilen in Excel Zählen

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread