Шрифт комірки VBA
У VBA можна змінювати властивості шрифту, використовуючи властивість шрифту VBA об'єкта діапазону. Введіть наступний код у редакторі VBA, і ви побачите список усіх доступних опцій:
1 | Діапазон ("A1). Шрифт. |
Нижче ми розглянемо кілька найпоширеніших властивостей.
Змінити колір шрифту
Існує кілька способів налаштування кольору шрифту.
vbColor
Найпростіший спосіб встановити кольори за допомогою vbColors:
1 | Діапазон ("a1"). Font.Color = vbRed |
Однак ви дуже обмежені в доступних кольорах. Є єдині доступні варіанти:
Колір - RGB
Ви також можете встановити кольори на основі RGB (червоний зелений синій). Тут ви вводите значення кольору від 0-255 для червоного, зеленого та синього. Використовуючи ці три кольори, ви можете створити будь -який колір:
1 | Діапазон ("a1"). Колір шрифту = RGB (255,255,0) |
ColorIndex
VBA / Excel також має властивість ColorIndex. Це робить готові кольори доступними для вас. Однак вони зберігаються як індексні номери, що ускладнює визначення того, якого кольору:
1 | Діапазон ("a1"). Font.ColorIndex =… |
Ми написали статтю про кольорові коди VBA, включаючи список кодів VBA ColorIndex. Там ви можете дізнатися більше про кольори.
Розмір шрифту
Це встановить розмір шрифту 12:
1 | Діапазон ("a1"). Розмір шрифту = 12 |
або до 16:
1 | Діапазон ("a1"). Розмір шрифту = 16 |
Жирний шрифт
Шрифт комірки легко налаштувати на жирний:
1 | Діапазон ("A1"). Font.Bold = True |
або очистіть жирне форматування:
1 | Діапазон ("A1"). Font.Bold = False |
Назва шрифту
Щоб змінити назву шрифту, використовуйте Назва майно:
1 | Діапазон ("A1"). Font.Name = "Calibri" |
1 | Діапазон ("A1"). Font.Name = "Arial" |
1 | Діапазон ("A1"). Font.Name = "Times New Roman" |
Стиль комірки
Excel пропонує можливість створення «Стилів» комірок. Стилі можна знайти в Домашня стрічка> Стилі:
Стилі дозволяють зберегти потрібне форматування комірок. Потім призначте цей стиль новій комірці, і миттєво буде застосовано все форматування комірки. Включаючи розмір шрифту, колір комірки, стан захисту комірок та будь -що інше, що є в меню форматування комірок:
Особисто для багатьох моделей, над якими я працюю, я зазвичай створюю стиль комірки "Введення":
1 | Діапазон ("a1"). Style = "Вхід" |
Використовуючи стилі, ви також можете легко визначити типи клітинок на своєму аркуші. У наведеному нижче прикладі буде прокручено всі клітинки на аркуші та змінено будь -яку комірку зі Style = “Input” на “InputLocked”:
1234567 | Яскрава клітина як діапазонДля кожної клітинки в ActiveSheet.CellsЯкщо Cell.Style = "Вхід", тоCell.Style = "InputLocked"Закінчити ЯкщоНаступна клітина |