Случайные числа в диапазоне ячеек

Question

Я хочу генерировать случайные числа в моей модели. Каждый раз, когда я запускаю макрос, мой диапазон ячеек «G8:H34» должен заполняться различными случайными числами, которые должны быть целыми числами от 0 до 2. Я должен сгенерировать эти числа в VBA, потому что мне нужно использовать их, чтобы оптимизировать модель при минимальных затратах и использовать цикл после этого, чтобы найти наилучшую комбинацию, которая минимизирует стоимость. Спасибо!

Answer 1

Рассматривать:

Sub qwerty()
    Dim r As Range
    Set r = Range("G8:H34")
    With r
        .Formula = "=randbetween(0,2)"
        .Copy
        .PasteSpecial (xlPasteValues)
    End With
End Sub