Excel Experts,

I have the following code that goes through a column of data in row C,
starting from the bottom of the row, and inserts ONE blank row each time the
data in cells in Column C changes.

Sub InsertRow()

For i = Cells(Rows.Count, "c").End(xlUp).Row To 1 Step -1
If Cells(i - 1, "c") < Cells(i, "c") Then Rows(i).Insert

Next i

End Sub



How would I modify this code to insert TWO blank rows each time the data in
column C changes.

Thanks,
Alan






--
achidsey