Уважаемые знатоки,
пожалуйста помогите с написанием кода. Вот код:
который генерирует определенное количество случайных чисел (количество определяется числом из ячейки "В13") из диапазона между 1 и цифрой указанной в ячейке "В11". В силу необходимости использования этого генератора в работе, нужно чтоб он не создавал случайные числа, которые повторяются. Помогите с кодом. Заранее благодарен.
пожалуйста помогите с написанием кода. Вот код:
Код |
---|
Sub Randomnumber() Dim Rand As Range Randomize For Each Rand In Range("D11").Resize(Range("B13").Value, 1) Rand = WorksheetFunction.RandBetween(1, Range("B11")) Next Rand End Sub |