VBA檢查單元格內部顏色

我想根據單元格的內部顏色做一些事情。VBA檢查單元格內部顏色

這是迄今爲止的代碼，但它在If行上顯示錯誤。

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

如果您有任何想法，將不勝感激。謝謝

來源

2016-08-21 Smithfield

工作嘗試改變'如果.Range（「A」，I）.Interior.ColorIndex = 4 Then'爲'如果。範圍（「A」，i）.Interior.Color = 4然後' –

這不起作用。 – Smithfield

錯誤是「錯誤'1004'：應用程序定義的或對象定義的錯誤」 – Smithfield

作爲替代該版本可能是有點更容易

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

來源

2016-08-21 21:57:24 Slai

你不能合併範圍內的字母和數字。改用單元格。您需要將細胞放入細胞兩次，因爲使用cells來填充細胞時需要使用Range。
Range(Cells(i, 1), Cells(i, 1)).Interior.ColorIndex

來源

2016-08-21 19:19:26 atclaus

VBA檢查單元格內部顏色

回答

相關問題