Guten Tag,

ich probiere schon die ganze Zeit herum aber komme selber einfach nicht auf die Lösung mit meinen bescheidenen VBA Kenntnissen. Ich versuche die ganzen Rows in meiner Tabelle auf Farben zu überprüfen und falls in der Row eine Zelle farbig sein sollte möchte ich, dass die Zelle in der dritten Spalte der aktuellen Row farbig gemacht wird. hier mein Code mit dem ich das versuche: 

Sub Materialnummerfarbig()

Dim LastRow As Single
Dim y As Integer

LastRow = Cells(Rows.Count, "A").End(xlUp).Row

For y = 2 To LastRow
        If ActiveCell.EntireRow.Cells(y, 21).Interior.ColorIndex <> 2 Then
            Cells(y, 3).Interior.ColorIndex = 44
        End If
Next
End Sub

Kann mir da jemand vielleicht weiterhelfen?

Vielen Dank schonmal im voraus,

Ghost