том, проте він може також вести себе як властивість. При клацанні на першій темі відображається розділ, присвячений об'єкту Comment; якщо ви клацнете на другій темі, то побачите розділ для властивості Comment.
Властивості об'єкта Comment
Об'єкт Comment володіє шістьма властивостями. Якщо властивість доступно тільки для читання, це значить, що програма VBA може тільки отримувати властивість, але не змінювати його.
Властивість Тільки для Опис
читання
A p p l i c a t i o n Та Повертає об'єкт, що представляє додаток, в якому створювалося
примітка (тобто Excel)
Author Та Повертає ім'я людини,
який створив примітку
Сreator Та Повертає число, яке вказує додаток, в якому створювався об'єкт. Не використовується в Excel для Windows (застосовується тільки в Excel для Macintosh)
P a r e n t Та Повертає батьківський об'єкт для примітки (це завжди об'єкт Range)
Shape Так Повертає об'єкт Shape, який представляє форму, приєднаної до
приміткою
Visible Немає Якщо це властивість має значення True, то примітка відображається на екрані
В
Методи об'єкта Comment
У таблиці наведено методи, які можна використовувати в об'єкті Comment. Всі вони виконують звичайні операції, які виробляються над приміткою вручну. Однак ви ніколи раніше не розглядали ці дії як методи.
Таблиця 1. Методи об'єкта Comment
Метод Опис
D e l e t e Видаляє коментар
Next Повертає об'єкт Comment, представляє наступний коментар
P r e v i o u s Повертає об'єкт Comment, що представляє попередній коментар
Text Повертає або визначає текст у коментарі (метод має три аргументи)
Можливо, вас здивувало, що T ext - це метод, а не властивість. Цей формат приводить нас до важливого висновку: відмінності між властивостями та методами не завжди чіткі, а об'єктна модель не є ідеально послідовною. Насправді неважливо, наскільки точно ви будете розрізняти властивості і методи.
Поки використовується правильний синтаксис, не має значення, яку роль в коді виконує ключове слово - властивості або методу.
Колекція Comments
Колекція - це група однакових об'єктів. Кожен робочий лист має колекцію Comments, складається з усіх об'єктів Comment робочого листа. Якщо на робочому листі відсутні примітки, ця колекція порожня.
Наприклад, Наведений далі код посилається на перше примітка аркуша Лист1 активної робочої книги
Worksheets ("Лист1"). Comments (1)
Наступний оператор відображає текст, який міститься в першому примітці аркуша Лісг1:
MsgBox Worksheets ("Лист1"). Comments (1). Text
На відміну or більшості об'єктів, об'єкт Comment не має властивості Name. Отже, щоб послатися на конкретний коментар, використовуйте номер, а для отримання необхідного коментаря зверніться до властивості Comment об'єкта Range.
Колекція Comments - теж об'єкт, що має власний набір властивостей і методів.
Наприклад, наступний приклад визначає загальну кількість коментарів:
MsgBox ActiveSheet.Comments.Count
У даному випадку використовується властивість Count колекції Comments, в якому зберігається кількість об'єктів Comment на активному робочому листі. У наступному прикладі показано адресу клітинки, яка містить першу примітка:
MsgBox ActiveSheet.Comments (1). Parent.Address
У цьому прикладі Comments (1) повертає перший об'єкт Comment колекції Comments. Властивість P arent об'єкта Comment повертає його контейнер, представлений об'єктом Range. У вікні повідомлень відображається властивість A ddress об'єкта Range. У підсумку оператор показує адресу осередки, містить перші примітка.
Крім того, ви можете циклічно переглянути всі примітки на аркуші, використовуючи конструкцію For Each-Next. Нижче наведено приклад використання окремих вікон для роздільного відображення кожного примітки активного робочого листа:
For Each cmt in ActiveSheet.Comments
MsgBox cmt.Text
Next cmt
Якщо ви не хочете, щоб на екрані знаходилася велика кількість діалогових вікон з повідомленнями, то використовуйте наступну процедуру для виведення всіх приміток в одному вікні Intermediate:
For Each cmt in ActiveSheet.Comments
Debug.Print cmt.Text
Next cmt
Про властивість Comment
У цьому розділі йдеться про об'єкт Comment. У довідковій системі вказано, що об'єкт Range має властивість Comment. Якщо комірка містить примітку, властивість Comment повертає об'єкт-об'єкт Comment. Наприклад, наст...
