Закінчення табл. 2

1	2	3
Columns, Rows	Object: сімейство стовпців (рядків) робочого листа	Worksheet
Range	Object: діапазон	Worksheet
Current Region	Object: поточний діапазон, тобто діапазон, обмежений порожніми рядками й стовпцями	Range
Interior	Object: тло чарунки	Range
Hidden	Boolean: сховано чи ні діапазон	Range
Lock	Boolean: доступність чарунок діапазону для введення даних на захищеному листі	Range
Font	Object: шрифт діапазону	Range
Characters (start, length)	String: рядок зазначеної довжини length від зазначеного символу start	Range

Таблиця 3

Метод	Значення	Об'єкти
Calculate	Примусове обчислення у всіх відкритих робочих книгах	Application
Quit	Закриття додатка	Application
Activate	Активізація об'єкта	Workbook, Worksheet і ін.
Add	Додавання нового об'єкта в сімейство	Workbook
Open	Відкриття робочої книги	Workbook
Close	Закриття книги	Workbook
Protect	Захист робочої книги від внесення в неї змін	Workbook
Select	Вибір зазначеного робочого листа	Worksheet
Evaluate	Перетворення виразу в об'єкт чи значення	Worksheet
Clear	Очищення робочого листа	Worksheet
Delete	Видалення робочого листа	Worksheet
Copy	Копіювання робочого листа	Worksheet

Синтаксис установки значення властивості об'єкта:

<об'єкт>.<властивість>={<вираження> чи<значення властивості>}

Синтаксис читання властивостей об'єкта:

<змінна>=<об'єкт>.<властивість>.

Синтаксис виклику методу об'єкта:

{<об'єкт>.<метод> чи <об'єкт>.<метод> [arg1,][arg2,][…]}

Завдання до лабораторної роботи 1

У завданнях 1-4 розібрати й прокоментувати фрагменти програм.

1. Workbooks (1). Worksheets (1). Activate

Range (“A1:D5”). Value =34

Worksheets (1). Cells (12, 2). Interior. ColorIndex =3

Range (“C10”). Value = Range (“A1”). CurrentRegion. Rows. Count

Range (“C11:D11”). Merge

Range (“C11”). Interior. Color Index =5

Range (“C11”). Value =”Visual Basic”

Range (“C11”). Characters (8,5). Font. Italic =True

2. Workbooks (1). Worksheets (2). Name =”VBA”

Worksheets (“VBA”). Range (“A3:D5”). Value =34

Worksheets (“VBA”). Range (“A6:D6”). Merge

Worksheets (“VBA”). Name =”лист 1”

Worksheets (3). Visible =False

Worksheets (”лист 1”). Activate

Worksheets (”лист 1”). Used Range. Clear

3. Worksheets (1). Select

Range (“A1”). Value =”Не здавайся”

Range (“A1”). Font. Bold=True

Range (“A1”). Font. Italic=True

Range (“A1”). Font. Name=”Time New Roman”

Range (“A1”). Font. Size=26

'Установлений шрифт: напівжирний, курсив, ім'я, розмір

Range (“A1”). Font. Subscript=True 'нижній індекс

Range (“A1”). Font. Superscript=True 'верхній індекс

Range (“A1”). Font. Strikethrough=True ' перекреслення тексту

Range (“A1”). Font. Strikethrough=False 'скасування закресленого

Range (“A1”). Font. Underline=xlSingle 'підкреслення однією рискою

Range (“A1”). Clear

4. 'об'єднання і роз'єднання чарунок

Range(“B2:D2”). Select

With Selection

.Merge

.HorizontalAlignment=xlCenter

.Value=”Об'єднана чарунка”

End With

Worksheets(1).Select

With Range(“B2”)

.Unmerge

.Value=”Роз'єднана чарунка”

End With

5. Використовуючи властивості і методи об'єктів VBA, скласти фрагмент програми, за допомогою якої об'єднати чарунки А1:D4 другого робочого листа, ввести в чарунку текст “ Ми любимо VBA ”, установити тло чарунки, границю, колір, розмір і тип шрифту; змінити колір і стиль для фрагмента тексту “VBA”. Перейменувати лист 1 у “Передмову”. У чарунку F1 повернути діапазон, що містить дані.