[求助]Excel VBA

jayson

我想用vba 跑迴圈，但是執行時，一直告訴我
下方紅色的字有問題，請問我有哪裡有錯，
小弟平時沒有接觸vba，請見諒
謝謝

Sub Macro1()
Dim i As Integer
For i = 2 To 3000
    If Sheet4.Cells(D, 58).Value > Sheet4.Cells(D, 28).Value Then
      Sheet4.Cells(D, 53).Value = i
    Else
      
    End If
Next i

End Sub