Как перечислить все комментарии к новому листу или книге в Excel?
Если у вас есть книга со слишком большим количеством комментариев, и вы хотите перечислить все комментарии на новом листе или книге для просмотра всех комментариев, как вы можете это сделать? Следующие методы могут помочь вам быстро перечислить все комментарии рабочего листа / книги на новый рабочий лист или книгу в Excel.
Перечислите все комментарии к новому листу с кодом VBA
Перечислите все комментарии к новому листу или книге с помощью Kutools for Excel
Перечислите все комментарии к новому листу с кодом VBA
Следующий код VBA перечислит все комментарии к новому листу в текущей книге. На новом листе будут перечислены все комментарии всей книги в виде списка с именем листа, адресом ячейки, содержимым комментария и именем ячейки. Используйте этот метод следующим образом:
1. Нажмите Застройщик > Визуальный Бейсик, он отображает Microsoft Visual Basic для приложений окно. И нажмите Вставить > Модули, а затем введите следующие коды VBA в модуль.
VBA: перечисляет все комментарии на новом листе.
Sub ShowCommentsAllSheets()
'Update 20140508
Dim commrange As Range
Dim rng As Range
Dim ws As Worksheet
Dim newWs As Worksheet
Set newWs = Application.Worksheets.Add
newWs.Range("A1").Resize(1, 4).Value = Array("Sheet", "Address", "Value", "Comment")
Application.ScreenUpdating = False
On Error Resume Next
For Each ws In Application.ActiveWorkbook.Worksheets
Set commrange = ws.Cells.SpecialCells(xlCellTypeComments)
If Not commrange Is Nothing Then
i = newWs.Cells(Rows.Count, 1).End(xlUp).Row
For Each rng In commrange
i = i + 1
newWs.Cells(i, 1).Resize(1, 4).Value = Array(ws.Name, rng.Address, rng.Value, rng.Comment.Text)
Next
End If
Set commrange = Nothing
Next
newWs.Cells.WrapText = False
Application.ScreenUpdating = True
End Sub
2. Затем нажмите 
кнопку, чтобы запустить код, и вы получите новый рабочий лист со всеми комментариями в текущей книге. Смотрите скриншот:
Перечислите все комментарии к новому листу или книге одним щелчком мыши
Для Создать список комментариев of Kutools for Excel, вы можете быстро перечислить все комментарии к новому листу или новой книге.
Kutools for Excel: с более чем 300 удобными надстройками Excel, которые можно попробовать бесплатно без ограничений в течение 30 дней. Получить сейчас.
1. Если вы установили Kutools for Excel, нажмите Кутулс > Больше > Создать список комментариев, см. снимок экрана:
2. В Создать список комментариев диалоговое окно:
- Выберите область, в которой вы хотите перечислить комментарий, вы можете выбрать Активный лист or Все листы.
- Затем укажите место, в которое вы хотите поместить список комментариев, вы можете перечислить комментарии в новой книге или на новом листе, см. Снимок экрана:
3, Затем нажмите Создавайкнопка. Будет добавлен новый рабочий лист, в котором будут перечислены все активные комментарии рабочего листа с его атрибутами, такими как имя листа, ссылки на ячейки, строка и столбец. Смотрите скриншот:
Для получения более подробной информации о Создать список комментариев, Пожалуйста, посетите Описание функции создания списка комментариев.
Статьи по теме:
- Изменить все форматы комментариев в ячейках
- Изменить имя автора всех комментариев
- Найти и заменить текст в комментариях
- Показать или скрыть все комментарии и индикаторы комментариев в Excel
- Преобразование содержимого ячейки в комментарии в Excel
- Преобразование комментариев в содержимое ячейки в Excel
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
