Вам нужен макрос «UsedRange», чтобы пометить или подсчитать все ячейки, используемые в таблице, с помощью макроса. На двух примерах мы покажем вам, как это правильно использовать.
Если вы хотите обрабатывать ячейки в своих таблицах с помощью макросов, вам следует ограничиться ячейками, которые действительно содержат контент. Это проще и намного быстрее, чем поиск по всем ячейкам во всех столбцах и строках. Excel предлагает вам недвижимость для этой цели UsedRange в. Он относится ко всем используемым ячейкам таблицы и предоставляет Диапазон-Объект.
Используйте UsedRange, чтобы отметить используемые ячейки Excel
Следующий макрос показывает, как использовать свойство на практике:
Sub MarkAllUsedCells ()
ActiveSheet.UsedRange.Select
Конец подписки
На следующем рисунке показано, как это может выглядеть при использовании макроса в таблице. Все используемые ячейки отмечены:
Макрос всегда отмечает ячейки в активной таблице. Если вы хотите использовать другую таблицу, замените объект ActiveSheet обращаясь к соответствующей таблице.
Как посчитать используемые диапазоны ячеек в Excel
Чтобы подсчитать количество ячеек в таблице, содержащих формулу, используйте следующий макрос:
Подформулы подсчета ()
Dim Cell As Range Dim Count as Double Count = 0 для каждой ячейки в ActiveSheet.UsedRange. Ячейки Если ячейка. HasFormula Then Counter = Counter + 1 Следующая ячейка MsgBox ("В активной таблице есть" & Str $ (Counter) & "ячейки с формулами.")
Конец подписки
Макрос устанавливает свойство UsedRange.Cells это позволяет ссылаться на все ячейки, которые используются в таблице. Если ячейка содержит формулу, переменная «Счетчик» увеличивается на 1. Результат затем выводится в окне сообщения:
