Виведення робочих книг на друк

Щоб роздрукувати всю робочу книгу або якісь окремі її частини, використовуйте метод PrintOut:

WB.PrintOut(From, То, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName)

Жоден аргумент даного методу не є обов'язковим.

• From і То - перший і останній листи робочої книги, які необхідно вивести на друк. За умовчанням роздруковуються всі листи.

• Copies -число копій. За умовчанням значення рівне одиниці.

• Preview- якщо цьому аргументу передається значення True, перед висновком на друк відкривається вікно попереднього перегляду. За умовчанням використовується значення False.

• ActivePriпter - назва принтера, на якому выводяtся дані. Якщо ви не вкажете інший принтер, буде використаний принтер, встановлений за умовчанням для операційної системи Windows.

• PriпtToFile - якщо передати цьому аргументу значення True, дані відправляються на друк у файл, а не на принтер. За умовчанням використовується значення False.

• Collate - якщо проводиться друк декількох копій і даному аргументу передається значення True, копії друкуються в підбір. За умовчанням використовується значення False.

• PrToFi1eName - назва файлу, в який буде проведений друк.

Має сенс указувати лише в тому випадку, якщо аргументу PrintToFile передається значення True.

Метод PrintOut доступний також ДЛЯ деяких інших об'єктів ExcelChart, Range, Window і Worksheet.

Відправка робочої книги по електронній пошті ***********************

Щоб відправити файл робочої книги по електронній пошті, скористайтеся методом SendМail. Файл відправляється як вкладення з використанням встановленої у вашій системі поштової програми.

WB.SendМail(Recipieпts, Subject, ReturпReceipt)

Далі описані аргументи даного методу:

• Recipieпts - обов'язковий аргумент, що визначає список адрес, по яких проводиться розсилка;

• Subject - тема листа, необов'язковий аргумент. Якщо значення не вказане, то буде використана назва робочої книги, що відправляється;

• ReturпReceipt - якщо цьому аргументу передано значення True, зажадається підтвердження доставки повідомлення. Аргумент не обов'язковий, за умовчанням використовується значення False.

Адреса одержувача може бути вказана явно або за допомогою позначення імені, записаного в адресній книзі. Якщо одержувач один, передайте його ім'я або адресу поштової скриньки відповідному аргументу:

WB.SendМail rесiрiепts:="Дима Вовків"

Щоб відправити листи відразу декільком одержувачам, спочатку необхідно створити масив з|із| їх адресами:

Dim recip As Variant

recip = Аrrау("Діма Вовків", "someone@somewhere.com", "Bill Gates") WВ.SendМail recipients:=recip

*******************************************************************************************************

Інші методи і властивості об'єкту Workbook

Об'єкт Workbook містить досить багато методів і властивостей - дуже багато, щоб все детально розглянути в цій книзі. Деякі методи і властивості використовуються украй рідко, не дивлячись на це вони детально описані в довідковій системі. Такий опис найбільш часто використовуваних властивостей і методів об'єкту Workbook приведений табл. 3.1.

Таблиця 3.1. Опис деяких властивостей і методів об'єкту Workbook

ІМ'Я	Тип	Опис
ActiveSheet	Властивість	-Возвращает посилання на активну сторінку
Charts	Властивість	Повертає колекцію Sheets зпосиланнями на об'єкти Sheet всіх листів діаграм справжньої книги
Crea teBackup	Властивість	Якщо привласнено значення True, при збереженні робочої книги створюється її резервна копія
FullName	Властивість	Повне ім'я файлу робочої книги
HasPassword	Властивість	Має значення True, якщо робоча книга захищена паролем
Path	Властивість	Шлях до файлу робочої книги
ReadOnly	Властивість	Має значення True, якщо робоча книга відкрита тільки для читання
Saved	Властивість	Має значення True, якщо робоча книга зберігалася після внесення останніх змін
Sheets	Властивість	Повертає колекцію Sheets, що містить об'єкти Sheet всіх робочих листів і листів діаграм даної робочої книги
Worksheets	Властивість	Повертає колекцію Sheets, що містить об'єкти Sheet всіх робочих листів даної робочої книги
Activate	Метод	Робить|чинить| робочу книгу активною
AddToFavorites	Метод	Додає ярлик робочої книги в теку|папку| У:збранное
NewWindow	MeTO~	Створює нове вікно
Post	Метод	Відправляє робочу книгу в загальнодоступну теку на Мiсrоsоft Exchange Server
PrintPreview	Метод	Відображає робочу книгу у вікні Pгint Pгeview
WebPagePreview	Метод	Попередній перегляд робочої книги у вигляді Webстраницы

Об'єкт Worksheet

Робочий лист - один з двох типів листів, які може містити робоча книга. Другий тип - це листи діаграм. Розглянуті найбільш важливі відомості про роботу з об'єктами Worksheet, що представляють робочі листи.

Додавання і видалення робочих листів

Щоб додати до робочої книги новий порожній робочий лист, скористайтеся методом Add колекції Worksheets:

WB.Add(Before, After, Count)

Всі аргументи є необов'язковими:

• Аргумент Before - посилання на існуючий лист, перед яким повинні бути додані нові робочі листи.

• Аргумент After - посилання на існуючий лист, після якого повинні бути додані нові листи.

• Аргумент Couпt визначає кількість листів, що додаються. За умовчанням його значення рівне одиниці.

Зрозуміло, не можна одночасно передавати значення аргументам Before і After. Якщо при виклику методу жодному аргументу значення не були передані, новий робочий лист додається перед активним в даний момент листом. Метод Add повертає посилання на знов створений робочий лист. Якщо було додано декілька листів, метод поверне посилання на останній з доданих.

Новий робочий лист можна також додати за допомогою методу Add колекції Sheets, проте цей спосіб не надає ніяких додаткових переваг.

Відразу після створення нового листа бажано привласнити йому замість імені, встановленого за умовчанням (Листl, Лист2 і т.д.), інше ім'я, яке має інформаційне навантаження. Це ім'я відображається на екрані на корінці робочого листа і може бути використано для отримання посилання на робочий лист з колекцій Sheets або Worksheets.

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

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

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

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

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

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

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

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

DisplayAlerts = False

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

DisplayAlerts = True

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