[求助]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

Eric_Taiwan

> If Sheet4.Cells(D, 58).Value > Sheet4.Cells(D, 28).Value Then
把括號中的 (D, 58) 改為 (4,58) 就可以了執行了，請見下方。但這樣修改，外圍的 i 廻圈是沒有用的，或許你是想改成 "或許版" 的執行結果。

正確版: If Sheet4.Cells(4, 58).Value > Sheet4.Cells(4, 28).Value Then
或許版: If Sheet4.Cells(i, 58).Value > Sheet4.Cells(i, 28).Value Then

kuanll

在Cells(X,Y)內要放常數或變數,D要先轉換為數字,上面的是正解...