Dim i As Long
With ThisWorkbook.Sheets("Resultats SC")
For i = .Range("AI" & .Rows.Count).End(xlUp).Row To 31 Step -1
If .Range("F" & i) = 6278 And .Range("V" & i) = 0 And .Range("AI" & i).Value > .Range("AI" & i - 1).Value
Then .Range("AI" & i - 1).Value = .Range("AI" & i).Value
Next i
End With