使用Excel中的VBA将所有工作表的填充颜色设置为"无填充"

Question

如何No fill在Excel中使用VBA(所有单元格)设置所有纸张填充颜色.与选择所有工作表相同,选择所有单元格(Control + A)并更改fill color为No fill.

Answer 1

未经测试但应该做的工作:

Sub No_Fill_Wb()

Dim ws as worksheet

For each ws in Thisworkbook.Worksheets
    ws.Cells.Interior.ColorIndex = 0
Next ws

End Sub

Answer 2

我在使用Excel 2016的代码(见下文)中使用了"0",它将我的列变为黑色.

Master.Columns(Col_Start).Interior.Color = 0

然而,每个下面使用"xlNone"对我有用.

Master.Columns(Col_Start).Interior.Color = xlNone