Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

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

МЕНЮ САЙТА
  • 1
  • 2
  • 3

КАТЕГОРИИ РАЗДЕЛА

ОПРОСЫ
Какой версией Excel Вы пользуетесь?
Всего ответов: 35734
Главная » Готовые решения » 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
Добавил: Serge_007 | | Теги: Count, Cells, счет, Пустые, UDF, VBA, ячейки, Empty
Просмотров: 2510 | Рейтинг: 3.0/1
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!