wie kann ich denn ein Range C3:C13 auf meinem Sheet "Daten" so abfragen, damit ich in einem Label stehen habe, wieviel von diesen Zellen noch leer sind, sprich noch keinen Inhalt haben ?
Danke Mandy
Sub Leer()
Dim L&
L = ActiveSheet.Range("C3:C13").SpecialCells(xlCellTypeBlanks).Count
MsgBox L & " sind leer"
End Sub
Sub Nicht_Leer()
Dim L&
L = ActiveSheet.Range("C3:C13").Count - _
ActiveSheet.Range("C3:C13").SpecialCells(xlCellTypeBlanks).Count
MsgBox L & " sind gefüllt"
End Sub