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: как подсчитать количество строк в диапазоне