第241回 関数でできますか~？（解答編）

◆だれも見られていないようですが、とりあえず解答案を送ります

　　　　　　　　　　　　　　　　　　　　　　　　（maronさん）

 

130{=MOD(MAX(MID(RAND()&RAND()*10^9,ROW($3:$18),9)*(COUNTIF($B$2:$E2,ROW($1:$16))+COUNTIF($A3:A3,ROW($1:$16))=0)/1%+ROW($1:$16)),20)}

 

***************************************************************************

チェック用のVBSファイルをアップします。

ランダムに1から16の数字がセルB3：E6に重複なしで

表示されるかを10000回チェックします。

 

式を入力したワークシートをアクティブにして

VBSファイルをダブルクリックしてください。

 

チェック用VBSファイル： Checker2016_11_5をダウンロード

Comments

[投稿情報: くまぷー]

maronさんはランダム表示を狙ったわけですね。すごいです。
私には理解不能です。(+o+)

私は「1~16を重複なしで」ということなので

=COLUMN(A1)+4*(ROW(A1)-1)

なんの芸もありませんが
必要十分ということで・・・(^^ゞ

[投稿情報: maron]

◆第240回の解答と同じ考え方です
◆これも、何回かでエラーになるのでしょうか？

[投稿情報: くまぷー]

＞◆これも、何回かでエラーになるのでしょうか？

はい、数が重複する場合と#VALUE!が出る場合があります。

[投稿情報: maron]

◆これでいかがでしょう
124{=LARGE((COUNTIF($B$2:$E2,ROW($1:$16))+COUNTIF($A3:A3,ROW($1:$16))=0)*ROW($1:$16),RANDBETWEEN(1,16-COUNT($B$2:$E2,$A3:A3)))}

[投稿情報: くまぷー]

今、習志野市バドミントン市民大会から
帰ってきました。一段落したら調べます。
少々お時間をください。

[投稿情報: くまぷー]

チェック用VBSファイルをアップしました。
試してみてください。

[投稿情報: maron]

◆これの方がエラーが少なそうです
131{=TRUNC(LARGE((COUNTIF($B$2:$E2,ROW($1:$16))+COUNTIF($A3:A3,ROW($1:$16))=0)*ROW($1:$16),RANDBETWEEN(1,16-COUNT($B$2:$E2,$A3:A3))))}

[投稿情報: くまぷー]

124も131も不具合は起きないようです。
参りましたm(__)m

[投稿情報: maron]

◆ありがとうございました
◆ほかの方の回答は得られませんでしたが、よかったです