Подсчет пустых ячеек - Пользовательские функции - VBA - Готовые решения$

= Мир MS Excel/Готовые решения

Главная » Готовые решения » VBA » Пользовательские функции

Подсчет пустых ячеек

	22.09.2013, 22:33

Аналог функции Excel СЧИТАТЬПУСТОТЫ()
Function CountEmptyCells(iR As Range, Optional iB As Boolean) Dim iUR As Range If Not iB Then CountEmpty = _ iR.Count - Application.CountA(iR) Else For Each iUR In iR.Areas CountEmpty = _ CountEmpty + Application.CountBlank(iUR) Next End If End Function
1 2 3 4 5 Добавил: Serge_007 \| \| Теги: Count, cells, счет, пустые, UDF, vba, ячейки, Empty
Просмотров: 5032 \| Рейтинг: 3.0/1

Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]