Друзья, помогите, пожалуйста!!! Вот код и нужно найти ошибку                                         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

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

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

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

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

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