Как подсчитать количество ячеек в диапазоне в Excel?

В Excel мы всегда работаем с ячейками и диапазонами. Возможно, вы уже знаете, как подсчитывать пустые ячейки, непустые ячейки или ячейки, содержащие числа в диапазоне, но знаете ли вы, как подсчитать общее количество ячеек в диапазоне? Продолжайте читать, чтобы узнать, как это сделать.

Подсчет ячеек в диапазоне с помощью формулы

Здесь мы умножим две функции - СТРОКИ и СТОЛБЦЫ - для подсчета общего количества ячеек в диапазоне. Функция СТРОКИ используется для определения количества строк в заданном диапазоне. А функция СТОЛБЦЫ возвращает общее количество столбцов. Умножив результат этих двух функций, мы получим количество ячеек в диапазоне.

=СТРОКИ(B3:D9)*СТОЛБЦЫ(B3:D9)
Примечание: В приведенной выше формуле B3:D9 это диапазон, для которого вы хотите подсчитать общее количество ячеек.

Раскройте магию Excel с Kutools AI

• Умное выполнение: Выполняйте операции с ячейками, анализируйте данные и создавайте диаграммы — всё это посредством простых команд.
• Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации ваших рабочих процессов.
• Кодирование VBA: Пишите и внедряйте код VBA без особых усилий.
• Интерпретация формул: Легко разбирайтесь в сложных формулах.
• Перевод текста: Преодолейте языковые барьеры в ваших таблицах.

Улучшите возможности Excel с помощью инструментов на базе ИИ. Скачать сейчас и испытайте беспрецедентную эффективность!

Подсчет ячеек в диапазоне с помощью VBA

Если вы не хотите использовать формулу для получения общего количества ячеек в диапазоне, а предпочитаете видеть общее количество ячеек в окне сообщения, вы можете воспользоваться макросом VBA, следуя инструкциям ниже:

1. В Excel выберите диапазон, для которого вы будете подсчитывать общее количество ячеек.

2. Нажмите клавиши "Alt + F11", чтобы открыть окно Microsoft Visual Basic для приложений.

3. Щелкните "Вставка" > "Модуль". Затем скопируйте и вставьте следующий код VBA в окно Модуля.

Код VBA: Подсчет ячеек в диапазоне

Sub CountCellsInRange()
'Update by ExtendOffice
Dim xRg As Range
Set xRg = ActiveWindow.RangeSelection
MsgBox "There are " & xRg.Cells.Count & " cells in the selected range.", , "Kutools for Excel"
End Sub

4. Нажмите F5, чтобы запустить код VBA. Появится диалоговое окно, показывающее, сколько ячеек находится в выбранном диапазоне. Нажмите ОК, чтобы закрыть диалог.

Связанные статьи