2. Використання властивостей, що характеризують активність
Властивості, що характеризують активність, часто використовують в методах Select і Active.
Метод Select вибирає область клітин або сторінку.
Метод Active робить активним окрему клітину в рамках поточного вибору.
Властивість ActiveВook застосовується до робочої книги, що відображається в даний момент.
Властивість ActiveSheet – до поточної сторінки активної робочої книги.
Властивість ActiveCell завжди застосовується до одиничного об'єкту Range, що містить активну клітину поточної сторінки.
Властивість Selection тісно пов'язана з властивістю ActiveCell, але більше відноситься до всього вибору, чим до окремої клітини. Якщо вибрана лише одна клітина, Selection і Active однотипні.
Приклади:
Sub Program()
‘ Форматування вибраної клітини В3 і даних на аркуші
Sheets(“Лист1”).Select ‘ в поточній книзі вибраний аркуш Лист1
ActiveSheet.Range(“B3”).Select ‘ на активному (вибраному) аркуші ‘ вибрана клітина B3
ActiveCell.Value = 23 ‘ в активну клітину записується значення 23
ActiveCell.NumberFormat = “0.00” ‘ в активній клітині задається числовий ‘ формат 0.00
ActiveCell.HorizontalAlignment = xlCenter ‘ в активній клітині задається ‘ формат розташування даних по горизонталі по центру
‘ Форматування вибраного діапазону клітин C5:F7
‘ Форматування даних на вибраному аркуші (Лист1)
ActiveSheet.Range(“C5:F7”).Select ‘ на активному (вибраному) аркуші ‘ вибираємо діапазон клітин C5:F7
Selection.Value = 32 ‘ заповнюємо вибраний діапазон значенням рівним 32
Selection.NumberFormat = “0.00” ‘ в вибраному діапазоні задається
‘ числовий формат 0.00
Selection.HorizontalAlignment = xlCenter ‘ в вибраному діапазоні задається
‘ формат розташування даних по горизонталі по центру
ActiveSheet.Range (“A1”).Select ‘ на активному аркуші вибрана клітина A1
End Sub
3.Використання властивостей, що характеризують вміст
Властивість Value містить поточне значення клітини (числове і символьне).
Властивість Formula характеризує вміст, який записаний у клітину.
Властивість Formula пропонує два варіанти запису посилань на клітину у формулі:
у стилі A1 (ім'я колонки - номер рядка);
у стилі R2C3 (номер рядка – номер стовпця).
4. Властивості форматування
Послідовність дій в Excel: Формат → Ячейки … (Format → Cells…).
З’явиться вікно з вкладками можливих напрямків форматування даних, клітин (формат даних, колір, шрифт, фон, наявність та вид рамок, захист).
Послідовність дій в Excel: Формат → Ячейки → Число (Format → Cells → Number). Відкриється вкладка можливих числових форматів (рисунок 5.1).
Рисунок 5.1. Вікно діалогу Формат клітини, зі списком можливих числових форматів
Приклад.
Форматування числових даних у клітині – десяткове число з двома десятковими значеннями після коми, при наявності від’ємного числа - виділяти червоним кольором. Настройка показана на рисунку 5.2.
Макрос має вигляд:
Sub Format_Number()
Range("D16").Select ‘ вибір клітини D16 для форматування
Selection.NumberFormat = "0.00_ ;[Red]-0.00 "
Range("E19").Select
End Sub
Рисунок 5.2. Форматування числових даних: десяткове число, два десяткових знака, якщо від’ємне – червоний колір
Приклад.
Форматування даних в клітині G20 на вкладці Шрифт показано на рисунку 5.3.
Рисунок 5.3. Форматування шрифту для введення даних
Макрос матиме наступний вигляд:
Sub Format_Font()
Range("G20").Select ‘ вибір клітини G20 для форматування
With Selection.Font ‘ форматування шрифту
.Name = "Arial Cyr" ‘ шрифт
.FontStyle = "обычный" ‘ тип
.Size = 10 ‘ розмір
.Strikethrough = False ‘ закреслювання не включено
.Superscript = False ‘ над рядковий (верхній індекс) не включено
.Subscript = False ‘ під рядковий (нижній індекс) не включено
.OutlineFont = False ‘ контурний шрифт не включено
.Shadow = False ‘ тінь не включено
.Underline = xlUnderlineStyleNone ‘ підкреслення відсутнє
.ColorIndex = 5 ‘ колір шрифту (темно синій)
End With
Range("E19").Select
End Sub
Для включення ефекту потрібно задати значення True.
Існує декілька варіантів підкреслення (xlUnderlineStyleSingle - одинарне підкреслення по значенню, xlUnderlineStyleDouble - подвійне підкреслення по значенню, є ще декілька (варіантів)) вони задаються константами Excel. Константи додатку Excel позначаються xl, іноді константи заміняються числовими значеннями, але при читані процедури це не зовсім зручно, так як в назві константи визначається її суть. Для того щоб побачити список констант, застосовуйте Object Browser, вибираючи бібліотеку Excel та об’єкти Constants.
Таким чином можна переглянути усі вкладки для форматування.
Порада!!! Кращим способом написання програм форматування клітин на мові VB є використання макрорекордера.
Приклад.
Для створення зразків макросів форматування, зручно в одну клітину, наприклад С4 записати текст, в іншу, наприклад С6 записати число. Включити запис макросу (тема 2) і відформатувати потрібним чином ці клітини. Припинити запис, переглянути утворений макрос для редагування. В подальшому можливо використання макросу в програмі (посилання на цю процедуру, або вставка тексту цього макросу в код програми).