Друзья, , ! вот код и нужно найти ошибку 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
Dim I As Integer
Randomize
For I = 1 To 20
Sheets("Числа").Cells(I, 1) = Int(Rnd * 100) - 50
Next I
End Sub