Перейти к основному содержанию

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

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

Подсчитайте количество ячеек, содержащих комментарии, с помощью специальной функции Перейти

Подсчитайте количество ячеек, содержащих комментарии, с помощью функции, определяемой пользователем

Подсчитайте количество ячеек, содержащих комментарии, с кодом VBA


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

Для Перейти к специальному в Excel, вы можете сначала выбрать все ячейки комментариев, а затем просмотреть число в строке состояния.

1. Перейти к щелчку Главная > Найти и выбрать > Перейти к специальному, см. снимок экрана:

doc-count-комментариев-1

2. В Перейти к специальному диалоговое окно, пожалуйста, отметьте Комментарии вариант под Выберите раздел, см. снимок экрана:

doc-count-комментариев-1

3. Затем нажмите OK кнопку, чтобы закрыть это диалоговое окно, и все ячейки активного листа, содержащие комментарий, были выбраны сразу. И вы можете получить количество комментариев в строке состояния. Смотрите скриншот:

doc-count-комментариев-1

Примечание: Если у вас есть пустые ячейки с комментариями, комментарии в пустых ячейках не учитываются.

Наконечник: Вы также можете нажать Ctrl + G ярлыки для открытия Перейти к диалоговое окно и щелкните Особый кнопка, чтобы показать Перейти к специальному Диалог.


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

Вышеупомянутый метод имеет свой недостаток, поэтому мы можем создать определяемую пользователем функцию для подсчета всех комментариев к ячейкам, включая комментарии к пустым ячейкам.

1. Удерживайте ALT + F11 ключи, и он открывает Окно Microsoft Visual Basic для приложений.

2. Нажмите Вставить > Модулии вставьте следующий код в Окно модуля.

Код VBA: подсчитать количество ячеек с комментарием

Function CountComments(xCell As Range)
'Update 20140924
    Application.Volatile
    CountComments = xCell.Parent.Comments.Count
End Function

3. Затем сохраните и закройте код, вернитесь на рабочий лист, введите в пустую ячейку эту формулу: = countcomments (A1)(A1 - это ссылка на ячейку, вы можете изменить ее на любой другой адрес ячейки), см. снимок экрана:

doc-count-комментариев-1

4, Затем нажмите Enter key, и вы получите количество комментариев к ячейкам.


стрелка синий правый пузырь Подсчитайте количество ячеек, содержащих комментарии, с кодом VBA

Следующий код VBA также может помочь вам подсчитать все комментарии к ячейкам, включая комментарии к пустым ячейкам.

1. Удерживайте ALT + F11 ключи, и он открывает Окно Microsoft Visual Basic для приложений.

2. Нажмите Вставить > Модулии вставьте следующий код в Окно модуля.

Код VBA: подсчитать количество ячеек с комментарием

Sub CountComments()
'Update 20140924
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeComments)
If VBA.Err > 0 Then
    MsgBox 0
Else
    MsgBox WorkRng.Count
End If
End Sub

3, Затем нажмите F5 нажмите клавишу для запуска этого кода, и появится диалоговое окно, напоминающее вам о выборе диапазона данных, в котором вы хотите подсчитать комментарии к ячейкам. Смотрите скриншот:

doc-count-комментариев-1

4. Затем нажмите OK, вы получите количество комментариев к ячейкам в выделенном фрагменте.

doc-count-комментариев-1


Статьи по теме:

Как перечислить все комментарии к новому листу или книге в Excel?

Как найти и заменить текст в комментариях в Excel?

Как быстро вставить комментарий в несколько ячеек в Excel?

Лучшие инструменты для офисной работы

🤖 Kutools AI Помощник: Революционный анализ данных на основе: Интеллектуальное исполнение   |  Генерировать код  |  Создание пользовательских формул  |  Анализ данных и создание диаграмм  |  Вызов функций Kutools...
Популярные опции: Найдите, выделите или определите дубликаты   |  Удалить пустые строки   |  Объедините столбцы или ячейки без потери данных   |   Раунд без формулы ...
Супер поиск: Множественный критерий VLookup    VLookup с несколькими значениями  |   VLookup по нескольким листам   |   Нечеткий поиск ....
Расширенный раскрывающийся список: Быстрое создание раскрывающегося списка   |  Зависимый раскрывающийся список   |  Выпадающий список с множественным выбором ....
Менеджер столбцов: Добавить определенное количество столбцов  |  Переместить столбцы  |  Переключить статус видимости скрытых столбцов  |  Сравнить диапазоны и столбцы ...
Рекомендуемые функции: Сетка Фокус   |  Просмотр дизайна   |   Большой Формулный Бар    Менеджер книг и листов   |  Библиотека ресурсов (Авто текст)   |  Выбор даты   |  Комбинировать листы   |  Шифровать/дешифровать ячейки    Отправлять электронные письма по списку   |  Суперфильтр   |   Специальный фильтр (фильтровать жирным шрифтом/курсивом/зачеркиванием...) ...
15 лучших наборов инструментов12 Текст Инструменты (Добавить текст, Удалить символы, ...)   |   50+ График Тип (Диаграмма Ганта, ...)   |   40+ Практических Формулы (Рассчитать возраст по дню рождения, ...)   |   19 Вносимые Инструменты (Вставить QR-код, Вставить изображение из пути, ...)   |   12 Конверсия Инструменты (Числа в слова, Конверсия валюты, ...)   |   7 Слияние и разделение Инструменты (Расширенные ряды комбинирования, Разделить клетки, ...)   |   ... и более

Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени.  Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...

Описание


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Buenas tardes, me puede colaborar, que hacer para contar las celdas con comentarios dentro de un rango con Application.Volatile
This comment was minimized by the moderator on the site
sorry to say.. 9 of 10 times need the short 1 line answer. all this fancy dimm rap / buring the item need is just apita
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations