В Excel при подготовке отчетов для босса / руководства мы обычно вставляем комментарии, чтобы позволить другому человеку сообщить о статусе задачи.

Комментарии в основном используются для внутренних целей. В этой статье мы узнаем, как удалить все комментарии в Excel с помощью макросов.

Вопрос): я хотел бы применить код VBA, который удалит все комментарии из книги.

Я использую версию Excel 2003 дома и версию Excel 2010 в офисе.

У меня есть код, который отлично работает при удалении комментариев Excel 2010, но не может удалять комментарии Excel 2003.

Нам нужно выполнить следующие шаги:

Щелкните вкладку «Разработчик». В группе «Код» выберите Visual Basic

image 1

  • Нажмите «Вставить», а затем «Модуль»

image 2

Будет создан новый модуль. Введите следующий код в стандартный модуль. Следующий код совместим с версиями Excel 2007, Excel 2010 и Excel 2013

Sub Remove_Comments_After2007 ()

‘Удалить комментарии из книги Excel 2007

ActiveWorkbook.RemoveDocumentInformation (xlRDIComments)

End Sub

Следующий код совместим с версией Excel 2003

Sub Remove_Comments_2003 ()

‘Удалить комментарии из книги Excel 2003

Рабочий лист Dim wksAs

Dim cmnt как комментарий

Для каждой wksInActiveWorkbook.Sheets

Для каждого cmntInwks.Comments

cmnt.Delete

Следующая команда

Далее

End Sub

image 3

Чтобы запустить макрос, мы нажмем сочетание клавиш ALT + F8 *, чтобы открыть окно макроса и выбрать макрос.

  • Все комментарии будут удалены.

Таким образом, мы можем удалить комментарии Excel в зависимости от используемых версий.

download

Excel