Как в Excel выделить все ячейки с комментариями?
Комментарий - это полезная функция для нас, чтобы написать важную информацию в Excel, после вставки комментария в ячейке будет отображаться небольшой красный индикатор. Но иногда красные индикаторы не очень бросаются в глаза, поэтому мы можем выделить все ячейки с комментариями определенным цветом, чтобы сделать их более заметными. Пожалуйста, прочтите эту статью, чтобы узнать больше.
Выделите все ячейки с комментариями с помощью специальной функции Перейти
Выделите все ячейки с комментариями с кодом VBA
Выделите все ячейки с комментариями с помощью специальной функции Перейти
В Excel мы можем сначала выбрать все ячейки комментариев, а затем присвоить им понравившийся цвет, пожалуйста, сделайте следующее:
1. Выберите диапазон данных или весь лист, на котором вы хотите выделить ячейки с комментариями.
2. Затем нажмите Главная > Найти и выбрать > Перейти к специальному, см. снимок экрана:
Функции: Вы можете нажимать ярлыки Ctrl + G для открытия Перейти к диалоговое окно и щелкните Особый для открытия Перейти к специальному Диалог.
3. В Перейти к специальному диалоговое окно, отметьте Комментарии вариант, см. снимок экрана:
4. Затем нажмите OK чтобы закрыть это диалоговое окно, и все ячейки с комментариями были выделены в вашем выборе, см. снимок экрана:
5. После выбора ячеек комментария нажмите кнопку Цвет заливки значок под Главная вкладку и выберите один понравившийся цвет, все выбранные комментарии к ячейкам будут окрашены сразу, см. снимок экрана:
Выделите все ячейки с комментариями с кодом VBA
Вы также можете сразу выделить и раскрасить все комментарии к ячейкам на активном листе с помощью следующего кода VBA:
1. Активируйте свой рабочий лист, на котором вы хотите выделить ячейки комментариев.
2. Удерживайте ALT + F11 , чтобы открыть Окно Microsoft Visual Basic для приложений.
3. Нажмите Вставить > Модулии вставьте следующий код в Окно модуля.
Код VBA: выделить все ячейки с комментариями
Sub ColorComments()
'Update 20141110
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)
Application.ScreenUpdating = False
For Each Rng In WorkRng
Rng.Interior.ColorIndex = 36
Next
Application.ScreenUpdating = True
End Sub
4, Затем нажмите F5 нажмите клавишу для запуска этого кода, и появится диалоговое окно, напоминающее вам о выборе диапазона, в котором вы хотите выделить ячейки комментария, см. снимок экрана:
5, Затем нажмите OK, все комментарии в вашем выборе выделены цветом.
Внимание:
В приведенном выше коде вы можете изменить индекс цвета в скрипте. Rng.Interior.ColorIndex = 36 вам нравится.
Статьи по теме:
Как сбросить все позиции комментариев в Excel?
Как изменить цвет индикатора комментария в Excel?
Как автоматически добавлять дату и время для комментариев в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
