Как посчитать количество ячеек с комментариями в Excel?
Вы когда-нибудь пытались подсчитать количество комментариев на листе? В этой статье я познакомлю вас с некоторыми быстрыми приемами, как подсчитать количество ячеек с комментариями на листе.
Подсчитайте количество ячеек, содержащих комментарии, с помощью специальной функции Перейти
Подсчитайте количество ячеек, содержащих комментарии, с помощью функции, определяемой пользователем
Подсчитайте количество ячеек, содержащих комментарии, с кодом VBA
Подсчитайте количество ячеек, содержащих комментарии, с помощью специальной функции Перейти
Для Перейти к специальному в Excel, вы можете сначала выбрать все ячейки комментариев, а затем просмотреть число в строке состояния.
1. Перейти к щелчку Главная > Найти и выбрать > Перейти к специальному, см. снимок экрана:
2. В Перейти к специальному диалоговое окно, пожалуйста, отметьте Комментарии вариант под Выберите раздел, см. снимок экрана:
3. Затем нажмите OK кнопку, чтобы закрыть это диалоговое окно, и все ячейки активного листа, содержащие комментарий, были выбраны сразу. И вы можете получить количество комментариев в строке состояния. Смотрите скриншот:
Примечание: Если у вас есть пустые ячейки с комментариями, комментарии в пустых ячейках не учитываются.
Наконечник: Вы также можете нажать 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 - это ссылка на ячейку, вы можете изменить ее на любой другой адрес ячейки), см. снимок экрана:
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 нажмите клавишу для запуска этого кода, и появится диалоговое окно, напоминающее вам о выборе диапазона данных, в котором вы хотите подсчитать комментарии к ячейкам. Смотрите скриншот:
4. Затем нажмите OK, вы получите количество комментариев к ячейкам в выделенном фрагменте.
Статьи по теме:
Как перечислить все комментарии к новому листу или книге в Excel?
Как найти и заменить текст в комментариях в Excel?
Как быстро вставить комментарий в несколько ячеек в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!