Пожалуйста, помогите мне решить эту проблему. Как только я запустил этот макрос VBA, он показывает ошибку, в которой упоминается ошибка определения приложения или объекта.VBA-Excel Macro
Код:
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. Столбец А равен 1 не 0. –
Как упоминал Скотт, нет столбца 0. Однако ... вы действительно пытаетесь получить доступ к столбцу 0, или вы пытаетесь выполнить какой-то смещение из текущей ячейки? На данный момент ваш код, даже если вы меняете ', 0' и', 1' на ', 1' и', 2' соответственно, просто берет одну (активную) ячейку и помещает это же значение в 10 строк с то же самое соответствующее описание помещено в соседний столбец. Вместо этого вы пытаетесь обработать 10 разных значений в 10 строках, начиная с текущей ячейки? – YowE3K