Семейство Workbooks имеет всего несколько методов. Один из наиболее важных - метод Add. Все семейства имеют метод Add. Он создает новый объект семейства, для семейства Workbooks - это новая рабочая книга. Метод Add эквивалентен команде Файл | Создать (File | New). После создания книги, она становится активной. Метод Add имеет следующий синтаксис:

Синтаксис 1:

Workbooks.Add template

Синтаксис 2 (описывается объектная переменная и используется инструкция Set, чтобы назначить переменной ссылку на созданный объект):

Dim variable_name As Workbook
Set variable_name = Workbooks.Add(Template)

Параметр Template необязателен. Он позволяет задать шаблон, на котором основывается создаваемая рабочая книга. Данный аргумент используется, например, чтобы выбрать существующую книгу в качестве шаблона для новой.

В качестве значения параметра Template можно использовать следующие константы: xlWBATChart, xlWBATExcel4IntlMacroSheet, xlWBATExcel4MacroSheet, или xlWBATWorksheet. Если аргумент Template опущен, то создается рабочая книга с пустыми листами, параметры которой определяются с помощью команды Сервис | Параметры во вкладке Общие, либо задаются значением свойства Application.SheetsInNewWorkbook.

Приведем пример программы, в которой показано создание рабочих книг:

Dim oNewWorkbook As Workbook
' Создание рабочей книги с помощью константы
Workbooks.Add xlWBATWorksheet
'Создание рабочей книги с использованием в качестве шаблона
' другого файла
Workbooks.Add "C:\My Documents\Expense Report.xls"
' Создание рабочей книги и связьшание с ней объектной
' переменной
Set oNewWorkbook = Workbooks.Add

Для комментария : kadan@grsu.grodno.by