Подсчет заполненных ячеек Excel - VB

Узнай цену своей работы

Формулировка задачи:

Здравствуйте! Достаточно давно столкнулся с проблемой подсчета заполненных ячеек экселя, которую благополучно решил. НО! недавно обнаружил, что тот метод который идеально работал - оказался не универсальным, а именно: если стобец пустой, т.е. число заполненных ячеек в нем равно нулю, счетчик все равно выдает единицу. Вот мой код, помогите если кто знает как решить данную проблему:
Если появятся дополнительные советы или комментарии, буду очень благодарен

Решение задачи: «Подсчет заполненных ячеек Excel»

textual
Листинг программы
Function CountNotBlank(rn As Object) As Long
  CountNotBlank = rn.Cells.Count - MyXL.WorksheetFunction.CountBlank(rn)
End Function

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 4 из 5