Excel:使用 VBA 将条件格式应用于各个列中的空白单元格

Question

我已将重复的条件格式应用于大约 1500 行的工作表中的 AB、AD、AR、AT、BH 和 BJ 列，但它也突出显示了空白。

我试图创建一种额外的条件格式，将任何空白更改为白色单元格颜色，因为我找不到从空白单元格中删除条件格式的方法。

我发现目前突出显示单元格白色的唯一方法是再次使用条件格式，这在我录制宏时非常有效，但在我重放此宏时却不行，因为它会将整个列变为白色，或者将空白单元格保留为红色的。

这是附加条件格式的 vba 代码:

Sub Macro3()    
    Range("I:I,AB:AB,AD:AD,AR:AR,AT:AT,BH:BH,BJ:BJ").Select
    Range("BJ1").Activate
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=LEN(TRIM(BJ1))=0"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorDark1
        .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False

End Sub

非常感谢您的帮助，因为我花了太长时间试图找到解决方法!

Answer 1

尝试使用公式 isblank=true 添加另一个过滤器对于相同的细胞。