如何通过指定范围而不是UsedRange选项使用Excel宏清除单元格填充的颜色

时间:2015-08-19 07:54:57

标签: excel vba excel-vba

我需要以下问题的帮助:
如何通过在Excel VBA中指定范围或无限范围而不是使用UsedRange来清除填充颜色来清除单元格填充的颜色?

Worksheets("Sheet2").UsedRange.Cells.Interior.Color = -4142

1 个答案:

答案 0 :(得分:1)

要清除填充颜色,请勿重置颜色代码;将.Interior.Pattern更改为xlNone。

with Worksheets("Sheet2")
    with .cells(1, 1).currentregion
        with .resize(.rows.count -1, .columns.count).offset(1, 0)
            .Cells.Interior.Pattern = xlNone
        end with
    end with
end with