Изтрийте всички коментари в Microsoft Excel

Anonim

В Excel, докато подготвяме отчети за шеф/управление, ние сме склонни да вмъкваме коментари, за да позволим на другия човек да информира за състоянието на задачата. Коментарите се използват основно за вътрешни цели. В тази статия ще научим как да премахнете всички коментари в Excel, използвайки макроси.

Въпрос): Бих искал да приложа VBA код, който ще премахне всички коментари от работната книга.

Използвам Excel 2003 версия в дома си и Excel 2010 версия в офиса. Имам код, който работи перфектно при изтриване на коментари в Excel 2010, но не мога да изтрия коментарите в Excel 2003.

Трябва да следваме следните стъпки:

  • Кликнете върху раздела Разработчик
  • От групата Кодове изберете Visual Basic

  • Щракнете върху Вмъкване и след това Модул

  • Това ще създаде нов модул
  • Въведете следния код в стандартния модул

Следният код е съвместим с 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

Следващ cmnt

Следващия

End Sub

  • За да стартираме макроса, ще натиснем ALT + F8 клавиш за бърз достъп, за да отворите прозореца на макроса и да изберете макроса.
  • Всички коментари ще бъдат изтрити.

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