What's Wrong?

[Pam]

I'm trying to color the background of a row if a certain
set of conditions exists.

I don't know what's wrong with this:

For i = rng.Row To 1 Step -1

If Cells(i, 9).Value = Cells(i - 1, 10).Value _
And Cells(i, 10).Value = Cells(i - 1, 9).Value _
And Cells(i, 1).Value = Cells(i - 1, 1).Value _
And Cells(i, 2).Value = Cells(i - 1, 2).Value _
Then Cells(i, 1).EntireRow.Interior.ColorIndex = 35
end if
Next

I've tried taking out the "end if", including just "end",
but nothing works??? I get a 1004 error.

 

[Frank Kabel]

Hi
just remove the 'End if' statement

 

[Tom Ogilvy]

For i = rng.Row To 1 Step -1

If Cells(i, 9).Value = Cells(i - 1, 10).Value _
And Cells(i, 10).Value = Cells(i - 1, 9).Value _
And Cells(i, 1).Value = Cells(i - 1, 1).Value _
And Cells(i, 2).Value = Cells(i - 1, 2).Value _
Then
Cells(i, 1).EntireRow.Interior.ColorIndex = 35
end if
Next

or

For i = rng.Row To 1 Step -1

If Cells(i, 9).Value = Cells(i - 1, 10).Value _
And Cells(i, 10).Value = Cells(i - 1, 9).Value _
And Cells(i, 1).Value = Cells(i - 1, 1).Value _
And Cells(i, 2).Value = Cells(i - 1, 2).Value _
Then Cells(i, 1).EntireRow.Interior.ColorIndex = 35

Next

Both compile fine for me. However, I assume this is part of a larger
procedure, so it could be affected by code I can not see.