エクセル VBA 入門 乱数

      2016/05/03


乱数を発生させる

Randomize
乱数を初期化する
Rnd
1以下の乱数を発生される

サンプルソース

--------------------
Option Explicit
Sub start()
Dim r As Integer

Randomize

Range("A1") = Rnd
Range("A2") = Rnd
Range("A3") = Rnd
Range("A4") = Rnd

End Sub
--------------------

実行結果(乱数なのでこの数値にはならない)

0.420116603
0.608466744
0.698140442
0.902446985

PR



 - Excel入門 ,

Translate »