Как вставить случайные (целые) числа между двумя числами без повторов в Excel?

Этот метод будет использовать функцию RAND и функцию RANDBETWEEN для вставки случайных чисел между двумя числами в указанный диапазон в Excel. Пожалуйста, посмотрите формулы ниже:

Смотрите скриншоты ниже:

Случайные числа между 0 и 1 =RAND()

Случайные числа между 0 и 100 =RAND()*100

Случайные целые числа между 50 и 100 =RANDBETWEEN(50, 100)

Ниже приведенный код VBA поможет вам вставить любые случайные целые числа или случайные числа с заданным количеством десятичных знаков в указанный диапазон в Excel. Пожалуйста, выполните следующие действия:

1. Нажмите и удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. Нажмите Вставить > Модуль и вставьте следующий код в окно Модуля.

Public Function RandomNumbers(Num1 As Long, Num2 As Long, Optional Decimals As Integer)
'Update20131113
Application.Volatile
Randomize
If IsMissing(Decimals) Or Decimals = 0 Then
    RandomNumbers = Int((Num2 + 1 - Num1) * Rnd + Num1)
Else
    RandomNumbers = Round((Num2 - Num1) * Rnd + Num1, Decimals)
End If
End Function

3. Сохраните и закройте код, затем в пустой ячейке введите эту формулу =RandomNumbers(X,Y,Z), где X обозначает нижний предел чисел, Y обозначает верхний предел чисел, а Z — это указанное количество десятичных знаков случайных чисел.

Например, если я хочу сгенерировать некоторые целые числа между 50 и 1000, я могу вставить эту формулу =randomnumbers(50,1000,0); а также вставить случайные числа между 50 и 100 с 2 десятичными знаками с помощью этой формулы =randomnumbers(50,100,2). Смотрите скриншоты ниже:

Вставка случайных чисел без десятичных знаков:

Вставка случайных чисел с 2 десятичными знаками:

Вставка случайных целых чисел / дат / времени без дубликатов с помощью Kutools для Excel

Связанная статья:

Генерация случайных строк символов в диапазоне