VBA检查单元格内部颜色 [英] VBA checking cell interior color

问题描述

我正在尝试根据单元格的内部颜色进行某些操作.

I am trying to do something depending on the interior color of a cell.

到目前为止，这是我的代码，但是在If行上显示错误.

This is my code so far but it is showing errors on the If line.

For i = 3 To dumpLastRow
With masterFile.Sheets(dumpRef)

    If .Range("A", i).Interior.ColorIndex = 4 Then
            ''''CODE''''
    Else
            ''''CODE''''
    End If

End With
Next

如果您有任何想法，将不胜感激.谢谢

If you have any idea it would be appreciated. Thanks

推荐答案

该版本可能更容易使用

With masterFile.Sheets(dumpRef)
    Dim cell As Range

    For Each cell In .Range("A3:A" & dumpLastRow).Cells

        If cell.Interior.ColorIndex = 4 Then
            ''''CODE''''
        Else
            ''''CODE''''
        End If
    Next
End With

这篇关于VBA检查单元格内部颜色的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！