Vba: як видалити кольори заливки з комірок

Ви можете використовувати такий базовий синтаксис у VBA, щоб видалити рамки з комірок у певному діапазоні:

 Sub RemoveFillColor()
Range(" A1:B12 ").Interior.Color = xlNone
End Sub

У цьому конкретному прикладі видаляються всі кольори заливки з клітинок у діапазоні A1:B12 .

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

Приклад: використання VBA для видалення кольорів заливки з клітинок

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

Скажімо, ми хочемо видалити кольори заливки з кожної комірки в діапазоні A1:B12 .

Для цього ми можемо створити такий макрос:

 Sub RemoveFillColor()
Range(" A1:B12 ").Interior.Color = xlNone
End Sub

Коли ми запускаємо цей макрос, ми отримуємо такий результат:

Зауважте, що кольори заливки для кожної комірки в діапазоні A1:B12 видалено.

Щоб видалити кольори заливки з комірок в іншому діапазоні, просто замініть A1:B12 на інший діапазон у макросі.

Примітка . Повну документацію щодо властивості VBA Interior.Color можна знайти тут .

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

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

VBA: як видалити межі клітинок
VBA: Як підрахувати кількість аркушів у робочій книзі
VBA: як підрахувати кількість рядків у діапазоні