請幫我解決這個問題。一旦我運行這個VBA宏,它會顯示一個提到應用程序定義錯誤或對象定義錯誤的錯誤。VBA-Excel宏
代碼:
Sub income_status()
Dim i As Integer
For i = 1 To 10
Cells(i, 0) = ActiveCell.Value
If Cells(i, 0) <= 10000 Then
Cells(i, 1) = "Low Income"
ElseIf Cells(i, 0) > 10000 And Cells(i, 0) <= 50000 Then
Cells(i, 1) = "Medium Income"
Else
Cells(i, 1) = "High Income"
End If
Next i
End Sub
沒有列0.列A是1而不是0. –
正如Scott所說,沒有列0.然而......你是否真的試圖訪問第0列,或者你是否試圖從當前單元格執行某種偏移量?在你的代碼中,即使你分別改變',0'和',1'到',1'和',2',也只是取一個(活動)單元格,並將相同的值放到10行中相同的相應描述放置在旁邊的列中。你是否試圖從當前單元格開始處理10行中的10個不同值? – YowE3K