|
Лекции VBA. Можно выделить следующие разновидности макросов
Свойства объекта WORKBOOK и семейства WORKBOOKS
ActiveSheet
| Возвращает активный лист книги. В следующем примере устанавливается имя активного рабочего листа: ActiveSheet.Name = "Отчет"
| Sheets
| Возвращает семейство всех листов книги.
| Worksheets
| Возвращает семейство всех рабочих листов книги.
| Name
| Возвращает или устанавливает имя книги.
| Path
| Возвращает полное имя папки, в которой находится книга.
| FullName
| Возвращает полное имя книги, включая путь. Например, Имя = ActiveWorkbook. FullNaine.
|
Saved
| Логическое свойство, которое устанавливает, не производились ли изменения в книге со времени ее последнего сохранения.
| WriteReserved
| Логическое свойство, которое устанавливает, закрыта ли книга для записи.
|
Методы объекта WORKBOOK и семейства WORKBOOKS
Метод
| Описание
|
Activate
| Активизирует рабочую книгу так, что ее первый рабочий лист становится активным. Например, Workbooks("Отдел кадров").Activate
|
Add
| Создает новый объект в семействе Workbooks. Синтаксис:
Add (Template)
где Template - необязательный. Задает шаблон, на основе которого создается новая рабочая книга. Допустимые значения:
xlWBATChart; xlWBATExcel4IntlMacroSheet; xlWBATExcel4MacroSheet; xlWBATWorksheet.
Если аргумент Template опущен, то создается новая рабочая книга с количеством листов, заданных
свойством SheetsInNewWorkbook.
|
Protect
| Защищает рабочую книгу от внесения в нее изменений. Синтаксис:
Protect (Password, Structure, Windows) Password - необязательный. Строка, используемая в качестве пароля для защиты книги. Если параметр опущен, то книга защищена без пароля; Structure - необязательный. Логический параметр, который устанавливает, защищена ли структура книги, т.
|
| е. взаимное расположение листов;
- Windows - необязательный. Логический параметр, который устанавливает, защищено ли окно книги. В следующем примере устанавливается защита для активной рабочей книги:
ActiveWorkbook.Protect Password:= "ВинниПух"
|
Unprotect
| Снятие защиты с рабочей книги. Синтаксис:
Unprotect(Password)
где Password - необязательный. Строка, используемая в качестве пароля для защиты листа. В следующем примере снимается защита с активной книги: ActiveWorkbook.Unprotect Password:= "ВинниПух"
| Close
| Закрытие книги.
|
Open
| Открытие существующей книги. Синтаксис:
Open(FileName, Readonly, Password, Converter, AddToMRU)
FileName - обязательный. Имя открываемого файла; Readonly - необязательный. Логический параметр, задающий открытие файла в режиме, доступном только для чтения; Password - необязательный. Строка с паролем для защищенной книги; Notify - необязательный. Логический параметр, задающий, надо ли извещать пользователя о том, что файл доступен в режиме только для чтения; AddToMRU - необязательный. Логический параметр, задающий, надо ли добавить открываемый файл в список недавно использованных файлов.
Пример:Workbooks.Open "000 Рога и Копыта"
|
Save
| Сохраняет книгу. Пример: ActiveWorkbook.Save.
|
SaveAs
| Сохраняет книгу в другой файл. Синтаксис:
SaveAs (Filename, FileFormat, Password, WriteResPassword, ReadOnlyRecornmended, ConflictResolution, AddToMru, TextCodePage, TextVisualLayout)
D Filename - строка, указывающая имя файла, в который будет сохранена рабочая книга; FileFormat - необязательный. Задает формат файла;
|
| Password - необязательный. Строка с паролем для защищенной книги; WriteResPassword - необязательный. Строка с паролем для сохранения защищенной книги; ReadOnlyRecommended - необязательный. Логический параметр, указывающий, надо ли отображать сообщение, что файл доступен только для чтения; ConflictResolution - необязательный. Задает режим разрешения конфликтов при многопользовательском доступе к файлу; TextCodePage и TextVisualLayout - необязательные. Используются только в локальных версиях для задания кодовой страницы.
Пример:
ActiveWorkBook.SaveAs Filename:="Новая жизнь"
|
SaveAsCopy
| Сохранить рабочую книгу в другой файл, оставляя рабочую книгу в памяти с прежним именем.
Синтаксис:
SaveAs(Filename)
где Filename - строка, указывающая имя файла, в который будет сохранена рабочая книга.
В следующем примере активная рабочая книга
сохраняется в файл с именем "ЗапаснаяВерсия": ActiveWorkbook.SaveCopyAs "С:\ЗапаснаяВерсия".
|
Объект Worksheet и семейство Worksheets
В иерархии Excel объект worksheet идет сразу после объекта workbook и представляет рабочий лист.
Приведем несколько наиболее часто используемых свойств и методов объекта Worksheet.
|
|
|