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

Ответы 5

  • У меня этот код нормально отработал. Потом я скопировал его сюда
  • Сообщение у Вас идет, что индекс неверен? Если да, то однозначно неверно имя на вкладке листа "Числа"
  • Я там добавил картинку проверочную в ответ
    • Автор:

      raveniwbg
    • 6 лет назад
    • 0
  • моя вина...не ввел цифры в ячейки А1;А20...надо было ввести в ячейки любые цифры (-50;50)
  • Я ничего не вводил - все отработало и так.
    • Автор:

      homertpmm
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years