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

Как сбросить все позиции комментариев в Excel?

Автор: Сяоян Последнее изменение: 2024 июля 10 г.

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

Сбросить все позиции поля комментариев с кодом VBA в Excel
Один щелчок, чтобы сбросить все позиции поля комментариев с помощью Kutools for Excel


Сбросить все позиции поля комментариев с кодом VBA в Excel

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

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

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

Код VBA: сбросить все позиции комментариев на активном листе

Sub ResetComments()
'Update 20141110
Dim pComment As Comment
For Each pComment In Application.ActiveSheet.Comments
   pComment.Shape.Top = pComment.Parent.Top + 5
   pComment.Shape.Left = pComment.Parent.Offset(0, 1).Left + 5
Next
End Sub

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

Скриншот, показывающий, что несколько комментариев Excel не на своем месте до сброса с помощью VBA
Arrow
Скриншот, показывающий, что все комментарии Excel сброшены в исходные позиции с помощью VBA

Сбросить все позиции поля комментариев одним щелчком мыши

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

Перед применением Kutools for Excel, Пожалуйста, сначала скачайте и установите.

1. Если вы просто хотите сбросить положение всех полей комментариев на активном листе, нажмите Кутулс > Ещё > Сбросить позицию комментария > Активный лист.

Чтобы сбросить положение всех полей комментариев на всех листах текущей книги, нажмите Кутулс > Ещё > Сбросить позицию комментария > Все листы. Смотрите скриншот:

Скриншот, показывающий возможности Kutools for Excel по сбросу позиций комментариев на активном листе или на всех листах

После нажатия Активный лист или Все листы все позиции комментариев на активном листе или всех листах будут немедленно возвращены в исходное положение.

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

Демонстрация: сброс всех позиций полей комментариев одним щелчком с помощью Kutools for Excel

Kutools for Excel: Более 300 удобных инструментов у вас под рукой! Наслаждайтесь постоянно бесплатными функциями ИИ! Скачать

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

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

🤖 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% и сокращает количество щелчков мышью на сотни каждый день!