Macro Monday Challenge Count Blank Cells Function Solution

preview_player
Показать описание
Grab the Free VBA Quick Reference Guide
Solution to the Macro Monday Challenge of recreating the Count Blank Function

Function CountBlankCell(rng As Range)

cnt = 0

For Each cl In rng
If cl.Value = "" Then
cnt = cnt + 1
End If

Next

CountBlankCell = cnt

End Function
Рекомендации по теме
Комментарии
Автор

Is it possible to create function to count blanks only if another cell contains text? else do not count blank?

kennethvallecillo