В 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 в зависимост от версиите, които използваме.
