Color code duplicates with a twist

[most]

I know color code duplicates is a very common issue here on the internet, but I can't find any solution which is similar to my needs.

Based on the value in column A("My data") I want to color code the whole row where the value is the same.
I.e. row 1 and 2 has the same value and should be colored to grey. Row 3, 4 and 5 has the same value and should be colored to a another color and so on.

My data	(entire row color)
10	Grey
10	Grey
20	Dark grey
20	Dark grey
20	Dark grey
30	Grey
30	Grey
40	Dark grey
40	Dark grey

<tbody>
</tbody>

This is my code for the moment, but it doesn't work. The second if statement is major wrong.

LastRow = Cells(Rows.count, 1).End(xlUp).rowrowcolor = 225


For Each c In Range("A2:A" & LastRow)
 If c.Offset(1, 0).Value = c.Value Then
     Rows(c.row).EntireRow.Interior.Color = RGB(205, rowcolor, 205)
     Rows(c.row + 1).EntireRow.Interior.Color = RGB(205, rowcolor, 205)
 End If
   If rowcolor = 225 Then
     rowcolor = 255
      Else
     rowcolor = 225
   End If
Next c

 

[Fluff]

How about

   lastrow = Cells(Rows.Count, 1).End(xlUp).Row
   rowcolor = 225
   
   For Each c In Range("A2:A" & lastrow)
      If c.Offset(1, 0).Value = c.Value Then
         Rows(c.Row).Resize(2).Interior.Color = RGB(205, rowcolor, 205)
      Else
         rowcolor = IIf(rowcolor = 225, 255, 225)
      End If
   Next c

 

[most]

Why are you so smart? =) Thanks!

 

[Fluff]

You're welcome & thanks for the feedback