Лекция: Присвоение значений
Рассмотрим в качестве примера объекта рабочую книгу (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 _
= «Муратова С.Ю.»