VBA関数
Rnd関数

Excelマクロで必須のVBA関数を入門・初級・初心者向けに詳細解説
最終更新日:2021-08-26

Rnd関数


Rnd関数は、単精度浮動小数点数型(Single)の乱数を返します。


Rnd関数

Rnd[(number)]

number
は省略可能です。
引数numberには、単精度浮動小数点数型 (Single) の数値または任意の有効な数式を指定します。

number の値 戻り値
< 0 常に、引数numberのシード値によって決まる同じ数値を返します。
> 0 乱数系列の次の乱数を返します。
=0 直前に生成した乱数を返します。
省略時 乱数系列の次の乱数を返します。

Rnd 関数は0以上、1未満の範囲の値を返します。

引数numberの値によって、Rnd関数が返す乱数が決まります。
初期シード値が変わらない限り、一連の Rnd関数が返す乱数系列は同じになります。

Rnd関数の注意点

システム タイマーから取得した新しいシード値を使って、乱数ジェネレータを初期化するには、
Rnd関数を呼び出す前に、引数を指定せずに Randomizeステートメントを実行してください。

任意の範囲の整数の乱数を生成するには、次の式を使ってください。

Int((上限 - 下限 + 1) * Rnd + 下限)

上限には乱数範囲の上限の数値を、下限には乱数範囲の下限の数値を指定し手ください。

Rnd関数の使用例

Int((20 - 2 + 1) * Rnd + 2) ・・・ 11~20までの乱数を発生させます。
Int((10 * Rnd) + 1) ・・・ 1~10までの乱数を発生させます。


Office VBA リファレンス Rnd関数


※VBA関数一覧
マクロVBA関数の一覧と解説です、どんな関数があるかは一度は確認しておくとをお勧めいたします。どんな関数があるだけでも知っておけば、詳細の使い方は実際に使うときに調べても良いでしょう。文字列操作…34 分岐…3 型変換…14 データ判定…10 日付時刻…20 配列…6 ファイル操作…14 数学/財務…28 その他……



同じテーマ「VBA関数」の記事

Fix関数
Hex関数
Oct関数
Rnd関数
Round関数
InputBox関数
MsgBox関数
Environ関数
RGB関数
DoEvents関数
CreateObject関数


新着記事NEW ・・・新着記事一覧を見る

イータ縮小ラムダ(eta reduced lambda)|エクセル入門(2023-11-20)
PIVOTBY関数(縦軸と横軸でグループ化して集計)|エクセル入門(2023-11-19)
GROUPBY関数(縦軸でグループ化して集計)|エクセル入門(2023-11-18)
PY関数(Pythonコードをセル内で実行)|エクセル入門(2023-11-17)
画像「セルに配置」のVBAについて(365の新機能)|VBA技術解説(2023-11-13)
スピルのゴーストの範囲を選択するVBA|ツイッター出題回答 (2023-10-31)
エクセル試験3:月間の所定労働時間|エクセル練習問題(2023-10-04)
エクセル試験2:所得税の計算|エクセル練習問題(2023-10-04)
エクセル試験1:曜日別の平均客単価|エクセル練習問題(2023-10-04)
列全体を指定する時のRangeとColumnsの違い|ツイッター出題回答 (2023-09-24)


アクセスランキング ・・・ ランキング一覧を見る

1.最終行の取得(End,Rows.Count)|VBA入門
2.RangeとCellsの使い方|VBA入門
3.繰り返し処理(For Next)|VBA入門
4.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
5.変数宣言のDimとデータ型|VBA入門
6.条件分岐(IF)|VBA入門
7.ブックを閉じる・保存(Close,Save,SaveAs)|VBA入門
8.並べ替え(Sort)|VBA入門
9.マクロとは?VBAとは?VBAでできること|VBA入門
10.Range以外の指定方法(Cells,Rows,Columns)|VBA入門




このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。



このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
本文下部へ