Друзья, помогите, пожалуйста!!! Вот код и нужно найти ошибку Public Sub Числа() Dim I As...

Question

Друзья, помогите, пожалуйста!!! Вот код и нужно найти ошибку Public Sub Числа()
Dim
I As Integer
Randomize
Timer
For I = 1 To 20
Sheets("Числа".Cells(I, 1) = Int(Rnd * 100) - 50
Next I
End Sub
показывает, что ошибка в этой строке Sheets("Числа".Cells(I, 1) = Int(Rnd * 100) - 50

Answer 1

Sub Числа()
Dim I As Integer
Randomize
For I = 1 To 20
    Sheets("Числа").Cells(I, 1) = Int(Rnd * 100) - 50
Next I
End Sub

---

Comments

И, конечно же, в рабочей книге должен быть лист с именем Числа

---

я только не понял чем отличаются наши коды...все равно в той строчке ошибка какая-то

---

У меня этот код нормально отработал. Потом я скопировал его сюда

---

Сообщение у Вас идет, что индекс неверен? Если да, то однозначно неверно имя на вкладке листа "Числа"

---

Я там добавил картинку проверочную в ответ

---

моя вина...не ввел цифры в ячейки А1;А20...надо было ввести в ячейки любые цифры (-50;50)

---

Я ничего не вводил - все отработало и так.