根据背景颜色清除细胞范围的内容

Question

我有条件格式化，如果它们不适用，则会使单元格变为灰色;如果适用，则格式为绿色。

如果它们是灰色的，可以将“清除内容”应用于一系列单元格吗？

非常感谢

Answer 1

您可以将以下代码应用于给定范围内的所有单元格：

Dim targetIndex As Integer
targetIndex = 16 'one grey
If (ActiveCell.Interior.ColorIndex = targetIndex) Then
   ActiveCell.ClearContents
End If

您必须确定您认为“灰色”的内容。您甚至可以包含不同的索引以确保。这里有一个useful link，其索引与所有颜色相关联。