乱数を生成したい(例えば1~10の範囲でランダムな数を生成するとか)-Excel VBA Tips

Excel VBA Tips集-4

乱数を生成する方法

例えば、Excel VBAで、1から10までの値を、ランダムに発生させるためには、以下のように書きます。

Int(Rnd * 10) + 1

この例のように、Int関数Rnd関数を組み合わせることで整数の乱数を一定の範囲内で生成することができます。

[スポンサードリンク]

文法

Int(Rnd *最大値) + 最小値

このように書くことで、最小値以上、最大値以下の乱数を取得できます。

下記にサンプルプログラムを示します。

[スポンサードリンク]

Excel VBAにおける乱数のサンプルプログラム

ちょっとした占いマクロですね(笑) 😛

【実行結果1】

vbaで乱数を発生させるサンプルプログラムの実行結果-1

【実行結果2】

vbaでRnd関数を用いて乱数を発生させるサンプルプログラムの実行結果-2

関連項目

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

CAPTCHA