MyWB ініціалізувала і тепер посилається на існуючий об'єкт

MyWB містить значення Nothing

Dim MyWB As Workbook

Значення Nothing

Посилання на робочі листи

МойРабочийЛіст.Delete

МойРабочийЛіст.Delete

Dim МойНовийЛист Аs Worksheet

Set МойНовийЛист:=ActiveWorkbook.AddМойНовийЛист.Nаmе= "підсумковий звіт"

Робочий лист, що створюється в ході виконання програми, спочатку не видно користувачу. Щоб відобразити його на екрані і надати користувачу можливість працювати з ним, властивості Visible даного Листа необхідно привласнити значення True.

Для видалення робочого листа використовується метод Delete відповідного об'єкту Worksheet:

Також для цих цілей можна застосувати посилання на даний робочий лист, одержане з колекції Worksheets:

МояКніга.Worksheets(ІмяЛіста).Delete

Звичайно при спробі видалення робочого листа Excel запрошує у пользовате:rя підтвердження на виконання даної операції. Для того, щоб такий запит не відображався на екрані, необхідно привласнити значення False властивості: DisplayAlerts об'єкту Application:

DisplayAlerts = False

DisplayAlerts = True

Після видалення робочого листа обов'язково поверніть властивості DisplayAlerts значення True (див. попередній приклад).

Раніше вже були розглянуті способи звернення до необхідного робочого листа, зокрема, з використанням посилань, одержаних при створенні листа або витягнутих з колекції Worksheets. Ще один спосіб звернення до робочого листа полягає у використанні властивості ActiveSheet об'єкту Workbook. Ця властивість повертає посилання на лист (робочий або лист діаграм), що є в даний момент активним в цій робочій книзі. Якщо жоден лист робочої книги не є активним, властивість ActiveSheet повертає спеціальне значення Nothing (див. врізання "Значення Nothing").

В деяких випадках змінні, призначені для зберігання посилань на об'єкти, не посилаються ні на один з вже створених об'єктів (іншими словами, вони посилаються "в нікуди"). Для представлення таких посилань в мові VBA передбачено ключове слово Nothing.

Наприклад, змінна, яка повинна посилатися на якийсь об'єкт, на період між її оголошенням і ініціалізацією (коли їй привласнюється посилання на якийсь конкретний об'єкт) набуває значення Nothing:

Set MyWB = Workbooks.Add

Значення Nothing в певних умовах можуть також, повертати деякі властивості і методи об'єктів (наприклад, властивість ActiveSheet в тому випадку, якщо в даний момент жоден лист не є активним). Щоб перевірити, чи посилається змінна на об'єкт або має значення Nothing, скористайтеся виразом If... Then в поєднанні з оператором Is Nothing:

Дата добавления: 2014-01-05