Використання властивостей, що характеризують активність
Доступ до об'єктів Excel з VB
План
1. Об'єкти в мові VB.. 1
1.1. Методи об'єктів. 1
1.2. Контейнери і набори об'єктів. 1
1.3. Об'єкт Range. 2
2. Використання властивостей, що характеризують активність. 3
3. Використання властивостей, що характеризують вміст. 3
4. Властивості форматування. 3
5. Методи роботи з таблицями. 4
Об'єкти в мові VB
Об'єкт – це те, чим можна управляти за допомогою програми на мові VB, наприклад, кнопка, робочий лист, робоча книга, діаграма, елемент таблиці і так далі
Кожен об'єкт володіє деякими характеристиками або властивостями. Наприклад, діалог може бути видимим або невидимим в даний момент на екрані. Змінюючи властивості, можна змінити характеристики об'єкту.
Об'єкти також мають методи. Методи – це те, що можна робити з об'єктами.
Методи об'єктів
Методи – це команди, за допомогою яких деяке перетворення об'єктів.
Синтаксис виклику методу об'єкту повинен мати вигляд:
Об'єкт.Метод [аргументи]
У квадратних дужках знаходиться необов'язковий елемент програмного коду, тобто аргумент.
Приклад: Range(“B3:F5”).Select – вибирається діапазон B3:F5
Range(“Результати”).Table Cells(4,4) Cells(8,7) – тут створюється таблиця даних з ім'ям Результати, а аргументи указують на початкове і кінцеве вічка (таблиці).
Контейнери і набори об'єктів
Excel складається з безлічі об'єктів: робочих книг, робочих листів, листів з діаграмами і т.д, причому деякі з цих об'єктів містять інші об'єкти. Наприклад, робоча книга містить робочі листи, листи містять рядки і стовпці .
|
|
|
Об'єкт сам високого рівня – Application. Для вказівки потрібного об'єкту в контейнері, необхідно вказати його ім'я після крапки, яка слідує за ім'ям об'єкту, – контейнера.
Workbook(“Р_00_51”).WorkSheets(1).Delete
де Workbook(“Р_00_51”) – контейнер, WorkSheets(1) – об'єкт, Delete – метод.
Application.Workbook(“Р_00_51”).Close
Набор об'єктів – це контейнер для всіх об'єктів певного класу.
Workbook – об'єднує всі поточні відкриті робочі теки (книги).
WorkSheets – об'єднує всі листи у відкритих робочих теках (книгах).
Sheets – об'єднує всі сторінки будь-яких типів в робочій теці.
Charts – об'єднує всі сторінки діаграм в робочій книзі.
Об'єкт Range – вічко/діапазон елементів таблиці.
Приклад запису:
Workbook(“ім'я книги”).WorkSheets(“ім'я листа”)
WorkSheets(“ім'я листа”).Range(“ім'я клітки/області”)
Об'єкт Range
Метод Union – використовується для об'єднання розрізнених груп вічок в один об'єкт Range.
Три методи дозволяють створювати об'єкт Range: Range; Cells; Offset.
Допускається використання квадратних дужок.
Метод Range –
- найбільш поширений метод, використовує як аргументів одну або два заслання на вічка і повертає об'єкт Range (заслання на вічко стовпець-буква рядок-число)
|
|
|
Приклад методу Range:
WorkSheets (“Ліст1”).Range(“B2”).Value = 1
результат: на листі з ім'ям Ліст1 клітка В1 набуває значення рівне 1.
WorkSheets (“Ліст1”).Range(“A4”,”C6”).Value = 2
результат: на листі з ім'ям Ліст1 діапазон кліток А4:с6 приймає значення рівне 2.
WorkSheets (“Ліст1”).Range(“B7:C9”).Value = 3
результат: на листі з ім'ям Ліст1 діапазон кліток В7:с9 приймає значення рівне 3.
Union WorkSheets (“Ліст1”).Range(“D1:F2”), _
WorkSheets (“Ліст1”).Range(“E7:G9”).Value = 4
результат: на листі з ім'ям Ліст1 діапазон кліток D1:F2 E7:G9 приймає значення рівне 43.
Метод Cells –
- отримуючи як аргументи два цілі числа, повертає об'єкт Range, що містить одиничне вічко. Аргументи визначають номери рядка і колонки вибраного вічка.
Цей метод найбільш зручний для вибору груп вічок по одній – змінюючи значення аргументу.
Приклад:
WorkSheets (“Ліст1”).Cells(1,2).Value = 1
результат: на листі з ім'ям Ліст1 клітка В1 набуває значення рівне 1.
WorkSheets (“Ліст1”).Cells(1,“D”).Value = 2
результат: на листі з ім'ям Ліст1 клітка D1 набуває значення рівне 2.
For I = 1 To 10
WorkSheets (“Таблиця”).Cells(I+5,2).Value = I
NEXT I
результат: на листі з ім'ям Таблиця клітка В6 набуває значення рівне 1, потім клітка В7 набуває значення рівне 2, потім клітка В8 набуває значення рівне 3, і так далі до клітки В15, яка набуває значення рівне 10.
|
|
|
Метод OffSet –
- працює аналогічно Cells, але об'єкт Range, що повертається, завжди задається щодо верхнього лівого кута поточного об'єкту Range. Метод Offset найчастіше застосовується для створення об'єкту Range щодо поточного активного вічка в робочій таблиці. У методі Offset використовується два аргументи – індекс рядка і індекс колонки, які є зсувом щодо поточного об'єкту Range.
Індекси змінюються від 0 до n для методу Offset, а для методу Cells – від 1 до n.
Наприклад, два наступні оператори посилаються на вічко E3:
WorkSheets (“Ліст1”).Range(“A1”).Cells(3,5)
WorkSheets (“Ліст1”).Range(“A1”).Offset(2,4)
Для створення об'єктів Range щодо деяких об'єктів Range краще використовувати метод Offset, це робить програму однозначнішої.
Використання властивостей, що характеризують активність
Властивості, що характеризують активність, часто використовують в методах Select і Active.
Метод Select вибирає область вічок або сторінку.
Метод Active робить активним окреме вічко в рамках поточного вибору.
Властивість ActiveWorkbook застосовується до робочої книги, що відображується в даний момент.
Властивість ActiveSheet – до поточної сторінки активної робочої теки.
Властивість ActiveCell завжди застосовується до об'єкту одноячеечному Range, що містить активне вічко поточної сторінки.
|
|
|
Властивість Selection тісно пов'язана з властивістю ActiveCell, але швидше відноситься до всього вибору, чим до окремого вічка. Якщо вибрано тільки одна вічко, Selection і Active однотипні.
Приклади:
Sub Program()
‘Форматування вибраного вічка В3 і даних на листі Ліст1
ActiveWorkbook.Worksheets (“Ліст1”).Select
ActiveSheet.Range (“B3”).Select
ActiveCell.Value = 23
ActiveCell.NumberFormat = “0.00”
ActiveCell.HorizontalAlignment = xlCenter
ActiveCell.BorderAround Weight: =xlThick, ColorIndex: =4
ActiveCell.Interior.ColorIndex = 6
‘Форматування вибраного діапазону вічок C5:F7 і даних на листі Ліст1
ActiveSheet.Range (“C5:F7”).Select
Selection.Value = 23
Selection.NumberFormat = “0.00”
Selection.HorizontalAlignment = xlCenter
Selection.BorderAround Weight: =xlThick, ColorIndex: =4
Selection.Interior.ColorIndex = 6
ActiveSheet.Range (“A1”).Select
End Sub
Дата добавления: 2020-12-12; просмотров: 88; Мы поможем в написании вашей работы! |
Мы поможем в написании ваших работ!