Makro funktioniert nicht
Helge
wollte gerne etwas färben, aber das gebastelte Makro funktioniert nicht.
Funktioniert
Sub farbig_B()
For i = 5 To Worksheets(1).Range("A2:A10").End(xlDown).Row
If Worksheets(1).Range("A" & i).Value = "x" Then
Worksheets(1).Range("B" & i).Interior.ColorIndex = 35
End If
Next i
End Sub
Funktioniert nichtSub farbig_B_D()
For i = 5 To Worksheets(1).Range("A2:A10").End(xlDown).Row
If Worksheets(1).Range("A" & i).Value = "x" Then
Worksheets(1).Range("B:D" & i).Interior.ColorIndex = 35
End If
Next i
End Sub
Was mache ich falsch?Gruß
Helge