I am trying to figure out how to select the current cell, and copy the
formula down one row. I am playing with:

For i = 3 To iLastRow + 1
If ActiveCell.Offset(-1, 0).Value < ActiveCell.Offset(-1, -1).Value Then
ActiveCell.Offset(1, 0).Select
Selection.AutoFill Destination:=Range("C2:C" & Cell.Row + 1),
Type:=xlFillDefault
iStart = i
End If
Next i


Something seems to be failing here, and I can't tell what it is. Can anyone
tell me?

Thanks,
Ryan--