Microsoft Office Tutorials and References
In Depth Information
8.5.4 Zellen zählen
Sub Zaehlen()
ThisWorkbook.Worksheets("Tabelle2").Activate
Range("E6").Value = Application. _
WorksheetFunction.Count(Range("E1:E5"))
Range("E10").Value = Application. _
WorksheetFunction.CountBlank(Range("E1:E9"))
End Sub
Das Ergebnis:
Abbildung 8.37
Zellen mit Zahlen, leere Zellen
Zur Erläuterung:
Die Funktion Count() ermittelt, wie viele Zellen des Bereichs E1 bis
E5 Zahlen oder Datumsangaben enthalten.
Count()
Im Beispiel trifft dies für die Zellen E1 und E4 zu.
Die Funktion CountBlank() zählt die Anzahl der leeren Zellen im
Bereich E1 bis E9.
CountBlank()
Im Beispiel trifft dies für die Zellen E7 bis E9 zu.
Search JabSto ::




Custom Search