christopher

Sie möchten gerne wissen, wie viele Zeilen in einem Tabellenblatt verwendet werden? Die folgende Funktion zählt alle Zeilen bis zur letzten, in der Text steht. Dabei werden Leerzeilen mitgezählt.

'Zählt die verwendeten Zeilen in einem Tabellenblatt.
'@param sWorksheet Der Name des Tabellenblatts.
Function countRows(sWorksheet As String) As Integer
    countRows = Worksheets(sWorksheet).UsedRange.Rows.Count
End Function