Як відформатувати клітинки в excel за допомогою vba (з прикладами)

Існує велика різноманітність способів форматування клітинок у Excel за допомогою різних властивостей VBA, зокрема:

• Додайте відступ
• застосування
• Кордони
• Творець
• Символьний шрифт
• ПрихованаФормула
• Горизонтальне вирівнювання
• Рівень вилучення
• Інтер’єр
• Заблоковано
• Об’єднати клітинки
• Числовий формат
• NumberLocalFormat
• Орієнтація
• Батько
• ReduceToAdjust
• Вертикальне вирівнювання
• Обернути текст

Створивши макрос у VBA, ви можете використовувати одну або кілька з цих властивостей для форматування клітинок у певному діапазоні на аркуші Excel.

У наступному прикладі показано, як це зробити на практиці.

Приклад: як відформатувати клітинки в Excel за допомогою VBA

Припустімо, що в Excel є такий список назв баскетбольних команд:

Ми можемо створити наступний макрос для форматування кожної клітинки в діапазоні A2:A11 з певними властивостями:

 SubFormatCells ()

    With Worksheets("Sheet1").Range("A2:A11")
     .Font.FontStyle = "Bold"
     .Font.Name = "Calibri"
     .Font.Size = 13
     .Font.Color = vbRed
     .HorizontalAlignment = xlCenter
    End With

End Sub

Після запуску цього макросу кожна клітинка в діапазоні A2:A11 буде відформатована у вказаний спосіб:

Використовуючи цей конкретний макрос, ми внесли такі зміни в кожну клітинку в діапазоні A2:A11 :

• Ми змінили стиль шрифту на жирний.
• Ми змінили сімейство шрифтів на Calibri.
• Ми змінили розмір шрифту на 13.
• Змінюємо колір шрифту на червоний.
• Ми відцентрували текст по горизонталі.

Зверніть увагу, що в цьому прикладі показано лише один спосіб форматування клітинок у певному діапазоні.

Використовуючи різноманітні властивості, доступні у VBA, ви можете відформатувати комірки до потрібного вам вигляду.

Примітка . Ви можете знайти повну документацію щодо всіх можливих властивостей форматування клітинок у VBA тут .

Додаткові ресурси

У наступних посібниках пояснюється, як виконувати інші типові завдання у VBA:

Як зробити шрифт жирним за допомогою VBA
Як центрувати текст за допомогою VBA
Як встановити розмір шрифту за допомогою VBA