2016-11-30 246 views
0

請幫我解決這個問題。一旦我運行這個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 
+3

沒有列0.列A是1而不是0. –

+0

正如Scott所說,沒有列0.然而......你是否真的試圖訪問第0列,或者你是否試圖從當前單元格執行某種偏移量?在你的代碼中,即使你分別改變',0'和',1'到',1'和',2',也只是取一個(活動)單元格,並將相同的值放到10行中相同的相應描述放置在旁邊的列中。你是否試圖從當前單元格開始處理10行中的10個不同值? – YowE3K

回答

0

沒有細胞(1,0)。行或列的索引總是以1開頭

+0

Ups,對不起,沒有看到Scott的評論 – Storax

+0

Scott Craner,實際上我想爲給定的一組數據創建一個宏。假設有一個專欄,其中包括幾個人的月收入。我想按照> 10000「低收入」,10001-50000:中等收入和> 50000高收入。在同一時間,我想統計每個類別中的數據數量。請幫我寫這個宏 –