Промяна на работен лист от код? Добавете коментар в клетка, за да уведомите потребителя за това, което току -що сте направили! Следните фрагменти от код ви показват как да добавите или изтриете коментар в клетка.
Добавяне на коментар в клетка с помощта на VBA
1. Поставете следния код някъде във вашия макрос, за да добавите коментар
| 1 | Sheet1.Range ("A1"). AddComment ("Hello World") |
Изтриване на коментар в клетка с помощта на VBA
2. За да изтриете коментар, използвайте този код
| 1 | Sheet1.Range ("A1"). Comment.Delete |
Редактиране на коментар в клетка с помощта на VBA
3. За да редактирате коментар, трябва да прочетете съществуващия и да го редактирате. Използвайте кода по -долу
| 123456789 | Dim OldComment As VariantЗатъмнете нов коментар като вариантOldComment = Sheet1.Range ("A1"). Comment.TextNewComment = OldComment & "Редактиран коментар"Sheet1.Range ("A1"). Comment.DeleteSheet1.Range ("A1"). AddComment (NewComment) |
Първо, трябва да прочетете съществуващия коментар в OldComment променлива.
След това можете да редактирате коментар, напр. добавете новия текст към съществуващия в Нов коментар променлива.
Сега трябва да изтриете стария коментар и да добавите новия. За да изтриете коментара, трябва да използвате .Коментар.Изтрий команда.
Накрая можете да добавите коментара от Нов коментар променлива с помощта на .AddComent команда.
