エクセルで「１～１５」の乱数表を作りたい。

エクセルで、「１」から「１５」までの１５種類の数字を使ってランダムの数列表を作りたいのですが、どのようにすればできますか？

その際、各数字はそれぞれ１個ずつ、一つのセルに入れるものとします。重複しても構いません。
例えば「７」「２」「９」「１３」「２」「４」「１」「９」・・・でもＯＫです。
また、同じ数字が連続するケースの発生もＯＫです。
例えば、「３」「８」「１４」「６」「６」「５」「７」・・・でもＯＫです。２連続だけでなく、３連続もＯＫです。

要は「１～１５の数字のランダムな出現による乱数表」が作成できればいいのです。

表の範囲は「Ａ７～ＩＶ２００」までです。

ＰＣの初心者ですので、詳しく丁寧に教えて頂ければ有り難いです。
例えば次のように・・・。

１．・・・・・・・・・
２．・・・・・・・・・・・・
３．・・・・・・・・
４．・・・・・・・・・・・・・・
５．・・・・・・・・・

と、いう風に、順を追ってウィザード風に書いて頂ければ・・・と思います。
ＰＣやエクセルや関数に詳しい方、宜しくお願いいたします。

No.1 ベストアンサー 回答者： te12889 回答日時： 2006/11/09 22:07

(1) A7からIV200までを範囲指定

(2) 数式バーに「=RANDBETWEEN(1,15)」（「」は不要）を入力し、「Ctrl」キーを押しながら「Enter」

その前に、「ツール」メニューから「アドイン」の「分析ツール」にチェックを入れておいてください。

参考URL：http://www.relief.jp/itnote/archives/001184.php

この回答へのお礼

有難うございました。
お陰さまで、簡単に乱数表が作成できました。

お礼日時：2006/11/10 11:21

No.3 回答者： kakkysan 回答日時： 2006/11/09 22:23

いろいろな方法があると思いますが、例えば

○Ａ７に=MOD(MID(RAND(),3,2),15)+1 の数式を入れて
ＩＶ２００までコピー（Ａ７のセルを左クリックして、セルの右下にカーソルを持ってくると＋記号になります。そのまま適当な範囲までドラッグします）

●式の意味

☆MOD(数、15) は数を１５で割った余りを出します。（0～14)それに＋
１をして１～１５の数にします。

☆MID(文字列、文字位置、文字数）は 指定した文字列の指定した左からの文字位置から、文字数だけを切り取った値にします。
例えば ＝mid(0.345675、3,2) は 45

☆RAND()は０以上１以下の数の乱数を発生させます。

なおNO１、NO2 のかたの数式の方が楽ですが、エクセルによってはこのRANDBETWEENが入っていない場合もありますのでご注意ください。

この回答へのお礼

ご回答、有難うございました。
今回は、＃１さんに教えて頂いた方法で簡単に作成できましたので、その方法を使いたいと思います。
幸い、ＲＡＮＤＢＥＴＷＥＥＮは入っていました。

お礼日時：2006/11/10 11:34

No.2 回答者： Hayashi_Trek 回答日時： 2006/11/09 22:19

エクセルの起動、

マウス操作等により指定したセルを選択する、
指定したセルにキーボードから文字を入力する、
等の操作は説明しなくても出来ると想定します。

１：セル［A7］を選択する。
２：セル［A7］に式『=RANDBETWEEN(1,15)』を入力する。（ただし『』は入力しない）
３：セル［A7］を選択して、コピーする。
４：セル［A7］から［IV200］の範囲を選択する。
５：編集メニューから「形式を選択して貼り付け」を選択してダイアログを表示させる。
６：「貼り付け」の形式として「数式」を選択する。
７：ダイアログのOKボタンを押して、貼り付けを実行する。
これで選択した範囲に1～15の乱数が入ります。
しかし、このままだと何か操作するたびに乱数が変わります。
セル［A7］から［IV200］の乱数を固定するには次のようにします。
８：セル［A7］から［IV200］の範囲を選択してコピーする。
９：セル［A7］から［IV200］の範囲を選択する。
　　（８のコピーから引き続き操作するなら選択しなおさなくても良い）
10：編集メニューから「形式を選択して貼り付け」を選択してダイアログを表示させる。
11：「貼り付け」の形式として「値」を選択する。
12：ダイアログのOKボタンを押して、貼り付けを実行する。
これでセル［A7］から［IV200］の範囲の乱数が固定されました。

この回答へのお礼

ご回答、有難うございました。
今回は、＃１さんの方法で簡単に作成できました。
＃２さんにご教示頂いた方法も、これからの参考にさせて頂きます。

お礼日時：2006/11/10 11:26