Anzahl der leeren Zellen innerhalb eines Bereiches ermitteln

 

101055


 
 
Mit dem Makro leere_zellen_ermitteln wird die Anzahl aller leeren Zellen im selektierten Bereich ermittelt und mittels einer MsgBox angezeigt.

Sub leere_zellen_ermitteln()
leer = 0
For Each Zelle In Selection
If Zelle.Value = "" Then
leer = leer + 1
End If
Next Zelle
MsgBox "Es gibt " & leer & " leere Zellen im selektieren Bereich."
End Sub

Über eine For-Nexe-Schleife wird die Variable leer bei jeder leeren Zelle im selektierten Bereich um den Wert 1 erhöht.
   

Excel-Inside auf FacebookExcel-Live News blogExcel-Inside RSS-FeedMail an Excel-InsideTwitter Account für Excel-InsideMail an Excel-Inside

Office Programmierung

Excel Auftragsprogrammierung

Access Auftragsprogrammierung

Word Auftragsprogrammierung

Outlook Auftragsprogrammierung

 

 

 

 




   
Office Schulungen VBA, Excel, Access
E-Book Formeln und Funktionen Excel 2013
Excel-Inside Newsletter abonnieren
   

Backlink  

ERROR: PAGE_URL belons not to given domain: 573001800