Rnd関数を使用したプログラミング例を紹介します。
例題
乱数を乱数列(B列)にセットし、セットされた乱数と値列(A列)の数値を掛け算して結果列(C列)に表示するプログラミング方法です。
[実行前]:
[実行後]:
プログラミング
プログラミングは以下の通りとなります。
[記述例]:
Sub サンプル()
Dim 行 As Double
Randomize
For 行 = 2 To 6
Range("B" & 行) = Rnd
Range("C" & 行) = Range("A" & 行) * Range("B" & 行)
Next
End Sub
内容を説明すると、
Rnd関数を使用して乱数列(B列)に乱数をセットし、セットされた乱数と値列(A列)の数値を掛け算して結果列(C列)に表示して下さい。
との意味になります。
ダウンロード
上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。