Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1192to1196
1192to1196
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
Maik
Hallo und guten Morgen,
ich habe im Tabellenblatt1 einen Button "Zeilenzählen".
Ich möchte gern die gefüllten Zeilen des Tabellenblattes2 damit zählen.
With Sheets("Tabelle2")
Zeilenanzahl = Cells(Rows.Count, 1).End(xlUp).Row
End With
Damit zählt er aber leider immer nur die Zeilen des Tabellenblattes1.
Ich hoffe ihr könnt mir helfen.
Danke
Maik
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Zeilen zählen
06.01.2011 08:42:08
hary
Hallo Maik
da fehlt ein Punkt,mit Deinem Code ermittelst Du aber nur die letzte Zeilennummer. 

Zeilenanzahl = .Cells(Rows.Count, 1).End(xlUp).Row

hiermit zaehlst Du die gefuellten ohne leere. 

Dim Zeilenanzahl As Long
With Sheets("Tabelle2")
Zeilenanzahl = WorksheetFunction.CountA(Range(.Cells(1, 1), .Cells(.Cells(Rows.Count, 1).End( _
xlUp).Row, 1)))
End With
MsgBox Zeilenanzahl

gruss hary
Anzeige
AW: Zeilen zählen
06.01.2011 09:03:12
Maik
Hallo Hary,
danke für deine Hilfe.
Funktioniert wunderbar.
Gruß Maik
;

Beliebteste Forumthreads (12 Monate)

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