-
特定の範囲の整数を生成する方法: 以下のコードは、1から10の範囲内の整数をランダムに生成する例です。
Dim randomNumber As Integer randomNumber = WorksheetFunction.RandBetween(1, 10)
-
複数の乱数を生成する方法: 以下のコードは、1から100の範囲内の乱数を10個生成し、セルに表示する例です。
Dim i As Integer For i = 1 To 10 Cells(i, 1).Value = WorksheetFunction.RandBetween(1, 100) Next i
-
乱数の種を固定する方法: 以下のコードは、乱数の種を固定して乱数を生成する例です。同じ乱数の種を使用すると、毎回同じ乱数の系列が生成されます。
Randomize 1 ' 乱数の種を1に設定 Dim randomNumber As Integer randomNumber = Int((10 * Rnd) + 1)
これらはExcel VBAでRandBetween関数を使用して乱数を生成するいくつかの方法の一部です。必要に応じて、これらの例をカスタマイズして利用することができます。