Excel で乱数(小数または整数)を生成するにはどうすればよいですか?
データ分析、シミュレーション、テストのシナリオでは、Excel で乱数が必要になることがよくあります。たとえば、学生の成績や財務予測のモデリング、プレゼンテーション用のサンプルデータ作成などがその例です。要件に応じて、小数(分数)値または整数のいずれかが必要になる場合があります。Excel には、これら両方のタイプの乱数を生成するための複数の組み込み関数、専用ツール、および自動化テクニックが用意されています。本チュートリアルでは、Excel で乱数(小数または整数)を生成する実用的な方法を紹介し、それぞれの適用シーンを解説するとともに、スムーズな操作のためのヒントやエラー回避のポイントもお伝えします。
RANDBETWEEN 関数を使用して乱数(整数)を生成する
ランダムデータを挿入するユーティリティを使用して乱数(小数または整数)を生成する![]()
VBA マクロを使用して乱数(小数または整数)の生成を自動化する
乱数(小数)を生成する
0 から1 までの範囲で乱数(小数)を生成する
Excel のRAND 関数は、0 から1 までの乱数(小数)を簡単に生成できる便利な関数で、素早いシミュレーションやテストデータ作成に最適です。
1。任意の空白セルをクリックして、次の数式を入力してください。
=RAND() Enter キーを押して確定し、フィルハンドルをドラッグすれば、隣接セルに瞬時に乱数(小数)を入力できます。生成される値はすべて0 以上1 以下です。
2。表示する小数点以下の桁数を調整するには、結果の範囲を選択し、小数点以下の桁数を増やすまたは小数点以下の桁数を減らすボタンをホームタブからクリックします。この操作では元の乱数自体は変更されず、表示上の精度のみが調整されるため、結果がより分かりやすくなります。

0 から X までの範囲で乱数(小数)を生成する
0 から任意の正の数 X までの範囲で小数の乱数を生成するには、Excel でRAND()*Xという数式を使いましょう。X の部分は、希望する最大値に置き換えてください。
1。空白セルを選択し、以下の数式を入力してください(例として X には99 を使用しています)。
=RAND()*99 2。セルのフィルハンドルをドラッグして、0 から99 の範囲で必要な数だけセルに乱数(小数)を入力します。この方法は、成績や価格など連続的なデータをサンプリングするのに最適です。
3。前述のように、小数点以下の桁数を増やすボタンまたは小数点以下の桁数を減らすボタンを使えば、小数の表示形式を簡単にカスタマイズできます。
X から Y までの範囲で乱数を生成する
2 つのカスタム範囲(X および Y。ただし X < Y)で乱数(小数)を生成するには、以下のExcel 数式をご利用いただくことをおすすめします。
=RAND()*(Y-X)+X これにより、X から Y までの範囲の数値が生成されます。たとえば、33 から88 の範囲で乱数(小数)を取得する場合:
=RAND()*(88-33)+33 空白セルに数式を入力し、Enter キーを押して確定後、必要に応じてフィルハンドルをドラッグして複数のセルに適用します。
数式を入力したら、ホームタブの書式設定ボタンを使って、表示される小数点以下の桁数を調整し、結果をより明確にしましょう。また、再計算せずに今後の分析のために乱数を保持したい場合は、結果を「値として貼り付け」でコピー&ペーストすることもできます。
ヒント:再計算(F9 キーを押す、新しい値を入力する、ワークブックを再度開くなど)を行うたびに、Excel はこれらのセルの乱数を再生成します。値が変更されないようにするには、生成後に値としてコピー&ペーストすることをおすすめします。
RANDBETWEEN 関数を使用して乱数(整数)を生成する
整数が必要な場面(たとえば、宝くじの抽選シミュレーション、ランダム ID の割り当て、整数データセットからのサンプリングなど)には、Excel のRANDBETWEEN 関数が手軽で確実な解決策を提供します。この関数はどんなユーザーにも使いやすく、指定した整数範囲すべてに対応可能です。
1。対象セル(例:A1)に、選択した下限値(X)と上限値(Y)の間で乱数(整数)を生成する次の数式を入力してください。ここでは例として、10 と50 を使用します。
=RANDBETWEEN(10,50) 2。Enter キーを押して数式を確定します。さらに多くの乱数(整数)を生成するには、フィルハンドルを下方向または横方向にドラッグしてください。
生成された結果を固定し、それ以上の変更を防ぎたい場合(RANDBETWEEN 関数は再計算のたびに値が更新されるため)、入力範囲を右クリックしてコピーを選択し、再度右クリックして値の貼り付けを選択してください。これで、乱数の結果が固定されます!
注意事項:両方の境界値(X および Y)は整数でなければならず、かつ Y は X より大きい必要があります。この条件を満たさない場合、エラーが発生します。重複のない複数の乱数(整数)を生成したい場合は、高度なツールや
ランダムデータを挿入するユーティリティを使用して乱数(小数または整数)を生成する
頻繁または複雑な乱数生成を行う際、特に一意性や形式、データタイプ(整数、小数、日付、時刻、文字列)のきめ細かい制御が必要な場合、あるいはプロセスを自動化したい場合には、Kutools for Excel のランダムデータを挿入するユーティリティがより汎用性の高いソリューションを提供します。数式を使う必要がなく、直感的なダイアログボックスで瞬時に結果が得られるため、繰り返しのタスクや大規模なデータセット、さらなる高度なランダム化機能が求められる場面に最適です。
「ランダムデータを挿入する」機能を使えば、以下の操作が可能です。
乱数(整数)を挿入する
乱数(小数)を挿入する
乱数(日付または時刻)を挿入する
乱数(文字列またはカスタムリスト)を挿入する
無料でインストールした後、以下の手順に従って操作してください。
ランダムデータを挿入するツールを起動するには、Kutools > 挿入 > ランダムデータを挿入するをクリックしてください。
乱数(整数)を挿入する
1。乱数(整数)を入力するセル範囲を選択します。
2。Kutools > 挿入 > ランダムデータを挿入するを開き、ダイアログで整数タブを選択します。最小値と最大値を指定し、必要に応じて重複しない値チェックボックスをオンにして、重複のないランダムな数値を生成します。
3。OKをクリックすると、選択したセルにすぐに乱数(整数)が入力されます。
乱数(小数)を挿入する
1。小数を入力する対象セル範囲を選択します。
2。Kutools > 挿入 > ランダムデータを挿入するを開き、小数タブに切り替えて、小数の範囲と希望の精度(小数点以下の桁数)を指定します。重複しない値もここで選択でき、重複のない結果が得られます。
3。OKをクリックすると、選択したセルに乱数(小数)が表示されます。
乱数(日付または時刻)を挿入する

乱数(文字列またはカスタムリスト)を挿入する
メリットとヒント:Kutools の「ランダムデータを挿入」ユーティリティを使えば、大規模なデータセットの処理が大幅に高速化されるだけでなく、手動入力によるエラーも完全に排除。さらに、Excel のネイティブ数式では簡単に実現できない日付や時刻、カスタムリストの挿入機能も備えています。
注記:選択したセルの数が、要求された一意の値の数より少ない場合、操作が失敗したり、データが不完全になったりする可能性があります。
デモ:Excel で乱数、日付、パスワードを挿入する
VBA マクロを使用して乱数(小数または整数)の生成を自動化する
大量の乱数を頻繁に必要とする、またはプロセスを自動化する必要がある高度なユーザー(例:繰り返しシミュレーション、バッチテスト、レポート作成など)にとって、VBA マクロは強力な代替手段です。VBA を使用すると、任意の制限された範囲で小数または整数を生成するなど、きめ細かい制御が可能であり、簡単に自動化および再現性を確保できます。この方法は、ネイティブの数式や手動ツールでは処理が遅すぎたり、必要な機能が不足している場合に最適です。
乱数(小数および整数)を生成するために、次のコードを使用できます。
1。まず、開発者ツール > Visual Basic をクリックします。Microsoft Visual Basic for Applications ウィンドウで、挿入 > 標準モジュールを選択し、次のコードを貼り付けます。
Sub GenerateRandomNumbers()
Dim rng As Range
Dim cell As Range
Dim minVal As Double, maxVal As Double, isInteger As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select destination range", xTitleId, rng.Address, Type:=8)
minVal = Application.InputBox("Enter minimum value", xTitleId, 1, Type:=1)
maxVal = Application.InputBox("Enter maximum value", xTitleId, 100, Type:=1)
isInteger = Application.InputBox("Type 'Y' for integer, 'N' for decimal", xTitleId, "Y", Type:=2)
If minVal >= maxVal Then
MsgBox "Minimum value must be smaller than maximum value.", vbExclamation
Exit Sub
End If
For Each cell In rng
If UCase(isInteger) = "Y" Then
cell.Value = Int((maxVal - minVal + 1) * Rnd + minVal)
Else
cell.Value = Rnd * (maxVal - minVal) + minVal
End If
Next
End Sub 2。実行するには、
ボタンをクリックします。すると、出力先のセル範囲や最小値/最大値、整数か小数かを指定するプロンプトが表示されます。このマクロは、小さなセル範囲から大きなセル範囲まで幅広く対応しており、自動化や一括での乱数生成タスクに最適です。エラーが発生した場合(例:最小値が最大値以上など)は、ポップアップ通知が表示されます。
ヒント:このマクロをボタンに割り当てれば、ワンクリックで操作可能。固定のパラメータを繰り返し使う場合は、プロンプトのカスタマイズもできます。
注:小数を生成する場合は、生成後にExcel の書式設定ツールを使って、目的の精度に合わせてセルの表示形式をさらに調整できます。
最高の Office 業務効率化ツール
| 🤖 | KUTOOLS AI アシスタント:次に基づいてデータ分析を革新します:インテリジェント実行 | コード生成| カスタム数式作成 | データ分析とチャート生成| 拡張機能呼び出し… |
| 人気の機能:検索・ハイライト、または重複をマーキング | 空白行を削除する | データを失うことなく列の結合またはセルを | 数式を使用しない四捨五入... | |
| スーパー LOOKUP:複数条件 VLookup | 複数値 VLookup | 複数シート間 VLookup | ファジーマッチ.... | |
| 高度なドロップダウンリスト:ドロップダウンリストをすばやく作成 | 連動型ドロップダウンリスト | 複数選択可能なドロップダウンリスト.... | |
| 列マネージャー:指定した数の列を追加|列の移動|非表示列の表示状態を切り替え|範囲および列の比較... | |
| 注目の機能:グリッドフォーカス | デザインビュー |強化された数式バー | ワークブックとシートマネージャー | リソースライブラリ(オートテキスト)| 日付ピッカー | ワークシートの統合 | 暗号化/セルの復号化 | リストからメール送信 | スーパーフィルター | 特殊フィルタ(太字のフォントを持つセルをフィルタリング/斜体/取り消し線。。。) 。。。 | |
| トップ15 ツールセット:12 テキストツール(テキストの追加、特定の文字を削除、...)| 50+チャートタイプ(ガントチャート、...)| 40+実用的関数(誕生日に基づいて年齢を計算します、...)| 19 挿入ツール(QR コードを挿入、パスから画像を挿入、...)| 12 変換ツール(単語に変換する、為替レートの変換、...)| 7 結合と分割ツール(高度な行のマージ、セルの分割、...)|さらに多数 |
Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。
Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします
- Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
- 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
- 日々の生産性を50%も向上させ、毎日数百回ものマウスクリックを削減します!
すべてのKutools アドインが、たった1 つのインストーラーで完結。
Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。
- オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン+Office Tab Pro
- インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能(MSI 対応)
- 連携してさらにパワーアップ— Office アプリ全体で生産性が向上
- 30 日間のフル機能トライアル— 登録不要、クレジットカード不要
- 最高のお得感— 個別アドイン購入よりお得