End Sub
Присвоение значений
Объекты, их свойства и методы
Каждый объект Excel располагает набором свойств (properties) и методов (methods).
Можно сказать, что свойства – это прилагательные, описывающие объект, а методы - глаголы, означающие действия, которые могут быть выполнены самим объектом или над ним.
1.1.1. Свойства: присвоение и использование значений
Рассмотрим в качестве примера объекта рабочую книгу (Workbook)- документ Excel. Вот некоторые свойства этого объекта[1]:
Author | имя пользователя, создавшего рабочую книгу |
HasPassword | True, если рабочая книга защищена паролем, и False - в противном случае |
Name | название рабочей книги |
Path | путь к файлу книги на диске |
Readonly | True, если сохранение рабочей книги запрещено, и False - в противном случае |
Над свойством можно выполнять две операции: задать его значение или использовать его. И в том, и в другом случае необходимо указать имя объекта и имя свойства, разделив их точкой. Для определения значения свойства используется знак равенства (=). Например, инструкция для присваивания значения свойству Author рабочей книги Мои таблицы.xls выглядит так:
|
|
Workbooks("Мои таблицы.xls").Author = "Муратова С.Ю."
Структура этой строки такова:
Имя объекта | Workbooks("Мои таблицы.xls") |
Точка (разделитель) | . |
Имя свойства | Author |
Знак присваивания | = |
Значение свойства | "Муратова С.Ю." |
ВНИМАНИЕ! Чтобы данная инструкция превратилась в подпрограмму VBA перед ней нужно вставить строку со словом Sub и названием подпрограммы, а после нее - строку со словами End Sub, как показано ниже:
Sub ЗадатьАвтора()
Dim Автор As String
Workbooks("Мои таблицы.xls").Author = "Муратова С.Ю."
По мере знакомства со свойствами рабочей книги мы узнаем и несколько важных правил.
Во-первых, со всеми свойствами связаны значения - строковые (например, имя рабочей книги), логические (например, свойство HasPassword), численные или другие.
Во-вторых, свойство может принадлежать одному или нескольким различным объектам. Например, в Excel свойство HasPassword есть только у объекта Workbook, а вот свойство Name - практически у всех объектов Excel.
В-третьих, есть свойства, которые можно только использовать[2], но нельзя изменить. Таковым, например, является свойство Path.
Для использования значения свойства применяют ту же инструкцию VBA, что и для присвоения, но ее элементы располагают в обратном порядке. Чтобы «извлечь» значение свойства, его обычно присваивают какой-либо переменной. В строке программы, приведенной ниже, значение свойства Author объекта Workbook присваивается строковой переменной Автор.
Sub УзнатьАвтора()
Dim Автор As String
Автор = Workbooks("Мои таблицы.xls").Author
MsgBox "Автор этой книги: " & Автор