- ベストアンサー
Excelの表作成について
- みんなの回答 (3)
- 専門家の回答
質問者が選んだベストアンサー
作業列を使用して、関数だけでやる方法です。 A1からG1まで、順に、 =INT(RAND()*50)+1 =INT(RAND()*49)+1 =INT(RAND()*48)+1 =C1+IF(C1<MIN(E1:F1),0,1) =A1 =B1+IF(B1<E1,0,1) =D1+IF(D1<MAX(E1:F1),0,1) という式を入力すれば、E1,F1,G1の3つが、求めたいものになります。 あとは、A1:G1を下にコピーすればよいです。
その他の回答 (2)
- kagakusuki
- ベストアンサー率51% (2610/5101)
今仮に、抽出した3個の数字がA列、B列、C列のセルに、横並びに表示されるものとし、D列を作業列にするものとし、表示を行う行範囲を1行~20行とします。 まずA1セルに =INT(RAND()*50)+1 と入力して下さい。 次にB1セルに =MOD(A1+INT(RAND()*49),50)+1 と入力して下さい。 次にC1セルは後回しにして、先にD1セルに =MOD(A1+INT(RAND()*48),49)+1 と入力して下さい。 次にC1セルに =IF(D1<B1,D1,D1+1) と入力して下さい。 最後に、A1~D1の範囲を選択してコピーした後、2行目~20行目にかけて、貼り付ければ完了です。 この数式は、1~50の範囲の数字の中から、異なる3個の数字を、ランダムに抽出する数式ですが、他の19組と比較して、同じ組合せの有無に関して判定を行っている訳ではありません。 ですから、何度も計算をやり直して行くと、約619回に1度の割合で、20組の中のどこかに、同じ並び方の組合せが、偶然現れます。(例えば「5,20,18」が2組現れる) 順番が異なるだけで、同じ数字が揃っている場合も、同じ組合せとみなす場合は、20組の中のどこかに、同じ組合せが偶然現れる頻度は、約113回に1度になります。(例えば「5,20,18」と「18,20,5」)
- ziziwa1130
- ベストアンサー率21% (329/1547)
一例です。 Sub Macro1() Dim n(1 To 50) As Integer Dim I As Integer, J As Integer, K As Integer, R As Integer Randomize For I = 1 To 50 n(I) = I Next Range("A1").Select For J = 1 To 20 For K = 1 To 3 1000 R = Int(50 * Rnd(1)) + 1 If n(R) = 0 Then GoTo 1000 ActiveCell.Offset(0, K - 1) = R n(R) = 0 Next For I = 1 To 50 n(I) = I Next ActiveCell.Offset(1, 0).Select Next End Sub このマクロを実行すると、セルA1~C20に3つずつの乱数の組20組が入ります。
関連するQ&A
- ロト6の組み合わせをExcelを使って表にランダムの数字で抽出する方法
ロト6の組み合わせをExcelを使って表にランダムの数字で抽出する方法 ロト6の組み合わせ・・・・ 1~43までの数字から6つの数字を選ぶ。 それを100通り作りたいんですが、関数や数式など、方法を教えてください。 100通りの組み合わせはすべて異なる組み合わせにしたいです。 よろしくお願いします。
- ベストアンサー
- 数学・算数
- Excelでの数字の抽出について
Excelでの数字の抽出について Excelの表を使って、0~9までの数字で4桁の数字をランダムに作成したいです。 その数字の組み合わせを20通り、異なる組み合わせで作りたいです。 その4桁の数字は、同じ数字を使用しても構いません。 例えば、「3・9・9・7」など。 どのような数式を使用すればいいでしょうか? また、同様に3桁の組み合わせの場合も教えて欲しいです。
- ベストアンサー
- 数学・算数
- 組み合わせの表を作成したいのですが・・・
画像のように9×3の組み合わせをEXCELの表で作成したいと思っています。 組み合わせの数は、3^9通り、即ち19,683通りあります。 途中までは作成したのですが、合っているのか合っていないのか分かりません。 もっと簡単に組み合わせの表が出来ないか、考えています。 エクセルの関数若しくはVBAで計算できる方法があれば教えて頂けると幸いです。 どうかよろしくお願いいたします。
- ベストアンサー
- Visual Basic
- Macでエクセルを使用しております。
Macでエクセルを使用しております。 数字と○、×の縦列の表で、数字が書いてあるマスがいくつか数える場合の数字や関数を教えてください。 また、ランダムな数字の縦列の表で、30以上の数字の数を数える数式や関数を教えてください。
- 締切済み
- Excel(エクセル)
- エクセルでランダムな座席表を作成したい
excel 2003を使用しています。 エクセルで、100名程度の座席表を作成したいと思っています。 今、机の絵をレイアウトどおりに表示させて、該当する机に社員番号を入れれば、社員名が表示されるように設定しています。 席替えを毎日行うので、1-100の数字をランダムかつ重複せずに入れて、簡単に座席変更をしたいのですが、方法がわかりません。RANDBETWEENだと、ランダムに数字が入りますが、重複してしまい、困っております。 ランダムに数字を入力でき、かつ重複しない方法を教えてください。 どうぞよろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセルで「1~15」の乱数表を作りたい。
エクセルで、「1」から「15」までの15種類の数字を使ってランダムの数列表を作りたいのですが、どのようにすればできますか? その際、各数字はそれぞれ1個ずつ、一つのセルに入れるものとします。重複しても構いません。 例えば「7」「2」「9」「13」「2」「4」「1」「9」・・・でもOKです。 また、同じ数字が連続するケースの発生もOKです。 例えば、「3」「8」「14」「6」「6」「5」「7」・・・でもOKです。2連続だけでなく、3連続もOKです。 要は「1~15の数字のランダムな出現による乱数表」が作成できればいいのです。 表の範囲は「A7~IV200」までです。 PCの初心者ですので、詳しく丁寧に教えて頂ければ有り難いです。 例えば次のように・・・。 1.・・・・・・・・・ 2.・・・・・・・・・・・・ 3.・・・・・・・・ 4.・・・・・・・・・・・・・・ 5.・・・・・・・・・ と、いう風に、順を追ってウィザード風に書いて頂ければ・・・と思います。 PCやエクセルや関数に詳しい方、宜しくお願いいたします。
- ベストアンサー
- その他(インターネット・Webサービス)
- エクセルの表作成
いつもお世話になっております。 エクセルで材料出納表を作っているのですが、一頁目で作成した書類を二頁目に数式をいれて残数量にもっていき、毎日の数量管理をしようとしているのですが、材料の品名を書くところが数式を入れると0という表示がでてきます。 0という数字を出さない為にはどうすればよいか教えて下さい・・・ 何が問いたいのかうまく説明できてないかも・・・すみませんが宜しくお願いします。
- ベストアンサー
- その他([技術者向] コンピューター)
- EXCELのVBAによる星取表から組合せ表の作成
VBAについて殆ど理解できていませんので、よろしくお願いいたします。 下記の星取表(相性表)、たとえば「あ」は、「うきくこさし」と組み合わせできるが、「くこ」は「き」と相性悪く一緒には組合すことが出来ません。 星取表(例) あいうえおかきくけこさし・・・ あ -×○×××○○×○○○・・・ い -○○○○○○○○○○・・・ う -○○○○○×○××・・・ え -××○○×○○○・・・ お -×○○×○○○・・・ か -○○×○○○・・・ き -×××○○・・・ く -××○○・・・ け -×××・・・ こ -○○・・・ さ -×・・・ し -・・・ このような星取表から、下記にあるような組合せ表を作成したいのです。 組合せ表 あいうえおかきくけこさし・・・ 1○ ○○ ○ 2○ ○ ○ 3○ ○ ○ 4○ ○ ○ 5○ ○ ○ 6○ ○ ○ ・ ・ ・ ○○○ ○ ・ ○○○ ○ ・ このような組合せを作成したいです。 よろしくお願いします。 なお、関数では難しいとは思いますが関数でも良い方法があればよろしくお願いいたします。 投稿画面を確認したのですが、○×の位置が少し筒ずれて分かりにくくなっています。説明しますと「し」の列は「・」の前です。
- ベストアンサー
- その他(業務ソフトウェア)
- 自分で作成したエクセルの表について。
エクセルの表の中にSUM等の計算式がいくつもあるのですが、計算式が入っているセルだけに色づけ等で表示する事は可能でしょうか? あくまでも作成済みのエクセルから抽出(色づけ)したいのですが。 ちなみにIF関数等のもの(セル)は作成していません。 エクセル2013です。 わかりづらい質問で申し訳ございませんがよろしくお願いいたします。
- ベストアンサー
- Excel(エクセル)