6. Создание, сохранение и закрытие рабочих книг
Для того чтобы создать новую рабочую книгу, используется метод Add кол
лекции Workbooks:
\Workbooks.Add(Template)
Аргумент Template задает имя файла, который будет использован в качестве шаблона новой рабочей книги, или одну из предопределенных констант xlWBATemplate (их можно увидеть в Object Explorer). Когда в качестве аргумента задается константа, в новой рабочей книге будет содержаться только один рабочий лист заданного типа. Если аргумент Template опущен, создается новая рабочая книга, содержащая то количество рабочих страниц, которое указано в свойстве Application.SheetslnNewWorkbook (по умолчанию — 3). Метод Add возвращает ссылку на новую рабочую книгу, которая может быть, если это необходимо, присвоена переменной соответствующего типа:
Dim MyWorkbook As Excel.Workbook
Set MyWorkbook=Workbooks.Add(Template)
Для открытия существующей на диске рабочей книги используется метод Open. Его упрощенный синтаксис:
Workbooks.Open(Fi1епате)
Обязательный аргумент Filename задает путь и имя открываемого файла. Метод Open имеет большое число дополнительных аргументов, которые определяют открытие только для чтения, ввод требуемого пароля (если книга защищена) и то, добавлять ли этот файл в список последних открытых файлов (в меню File приложения Excel).
Для сохранения рабочей книги, которой уже было присвоено имя, используется метод Save объекта Workbook. Этот метод не имеет аргументов. Для сохранения новой рабочей книги в первый раз с присвоением ей имени или для сохранения книги под другим именем используется метод SaveAs. Его упрощенный синтаксис:
MyWorkbook. SaveAs (Fi 1 епате)
Аргумент Filename определяет имя файла, включая его путь. Метод SaveAs имеет также множество необязательных дополнительных аргументов, которые управляют назначением файлу пароля или формата. Эти подробности хорошо описаны в онлайновой справке.
Для сохранения копии рабочей книги под другим именем, не изменяя при этом имя текущей книги, используется метод SaveCopyAs:
^Workbook. SaveCopyAs (Fi 2 eName)
Перед тем как рабочая книга будет сохранена и ей будет присвоено имя, в свойстве Name будет содержаться имя, присвоенное по умолчанию приложением Excel (Bookl, Book2, и т.п.). После того как имя будет назначено, оно будет содержаться в свойстве Name. Свойство Name нельзя изменить напрямую — для этого обязательно использовать метод SaveAs. Объект Workbook содержит еще два свойства, которые связаны с его именем. Как только рабочая книга была сохранена, свойство FullName будет содержать полное имя файла (вместе с путем), а свойство Path будет содержать только путь.
Для закрытия рабочей Книги используется метод Close: MyWorkbook.С1ose {SaveChanges, FileName, RouteWorkbook)
Все три аргумента не являются обязательными. SaveChanges задает вариант действий для случая, когда рабочая книга содержит несохраненные изменения. Возможными значениями являются True (для сохранения изменений) и False (для игнорирования изменений). Если этот аргумент опущен, пользователю будет предложено сохранить изменения.
FileName — это имя файла, в который сохраняется рабочая книга. Если этот аргумент опущен, используется текущее имя. Если такового не существует, пользователю будет предложено его ввести.
RouteWorkbook относится только к тем рабочим книгам, которые имеют список распространения (routing slip), но еще не были распространены; устанавливается в значение True, если необходимо отправить рабочую книгу следующему получателю, в противном случае устанавливается в False. Если этот аргумент опущен, пользователю выводится соответствующий запрос.