Как подсчитать количество не пустых ячеек определенного листа и записать в переменную - VBA

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

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

Подскажите, как подсчитать количество не пустых ячеек определенного листа и записать в переменную? Т.е макрос выполняется в "Лист1", при этом мне нужно знать количество не пустых ячеек столбца "А" листа "Лист2". Т.е код подсчета активного листа "Лист1":
А нужно неактивного листа "Лист2"?

Решение задачи: «Как подсчитать количество не пустых ячеек определенного листа и записать в переменную»

textual
Листинг программы
With Worksheets(12)
w12 = .Range(.Cells(1, 3), .Cells(1, 3).End(xlDown)).Count
End With
With Worksheets(13)
w13 = .Range(.Cells(1, 2), .Cells(1, 2).End(xlDown)).Count
End With
With Worksheets(14)
w14 = .Range(.Cells(1, 9), .Cells(1, 9).End(xlDown)).Count
End With
MsgBox w12 & " " & w13 & " " & w14

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


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

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

9   голосов , оценка 3.556 из 5
Похожие ответы