Excel Maniacs

関数で出来ますか～？ 第338回 ２重抽選

☆問題の背景

【一次抽選】
ある商品を購入すると１番から100番までの番号札が配られる。
毎日その日の一次当選番号が発表される。
それが50日間繰り返される。
一次当選者はその番号を大切に保管しておく。
当り番号の交付数（当選者数）は管理者に管理されている。
【最終抽選】
50日後最終当選のための抽選が行われる。
最終当選番号の決定は１から100の番号札を引いて決定する。
一度引いた番号は再度引くことができるが、1枚の番号札に対する当選は１回のみである。
管理者側としては、最終当選者が100人以上となった時点で終了としたい。

【問題】
セル番号G4に抽選回数に応じた最終当選者累計を表示するよう式を入れてもらいたい。
また、最終当選者累計が100を超えた時点で打ち切りとするため、
100以上となった時点で以下のセルは終了と表示してもらいたい。
なお、式はG4をしたにコピーする。
【ポイント】
最終抽選では同じ当選番号を引いた場合２回目以降の番号は無効となり累計欄に加算されない。
ただし、一時抽選で２回以上同じ番号が出た場合は、その人数は合計される。

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（minさん）

解答用参考ファイル： 20200603をダウンロード

解答用参考ファイル（VBA)： 20200603VBAをダウンロード（sakudaさん提供）

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

出題者を除く４名の方の解答作成完了宣言の後に、このスレに直接解答式をお書きください。

この問題に関しては解答用の別スレは作成いたしません。

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

関数で出来ますか～？ 第337回 酔っ払いJ

★　が出発点   
酔って   
歩こうとしている   
緑はjyoの家   
青は通路   
赤は迷い道   
最終的に（４歩目で）   
家に着けたら   ◎
着けないなら   ×

（ジョー３さん）

解答用参考ファイル： 20200531をダウンロード

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

出題者を除く４名の方の解答作成完了宣言の後に、このスレに直接解答式をお書きください。

この問題に関しては解答用の別スレは作成いたしません。

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

関数で出来ますか～？ 第336回 セル内数字の和Ⅱ

＜A 合計＞　あ行は先頭・い行は中間・う行は後尾の数を合計

＜B 合計＞　イ列は先頭・ロ列は中間・ハ列は後尾の数を合計

該当値が無い場合は０です

例：７７、、、先頭７７・中間０・後尾０
例：７７，２、、、先頭７７・中間２・後尾０
例：７７，２，１５、、、先頭７７・中間２・後尾１５

 

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（からくちさん）

 

解答用参考ファイル： 20200528をダウンロード

注：「解答用参考ファイル」の拡張子がzipになっている場合はxlsxに修正して下さい。

 

解答用参考ファイル： 20200528VBAⅢをダウンロード（マクロ入り　sakudaさん提供）

注：「解答用参考ファイル」の拡張子がzipになっている場合はxlsmに修正して下さい。

メモ
正解欄が変わらなくなった場合は、マクロ⇒EVStart　を実行してください。
ループ回数が空の場合は1000となります。

 

 

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

出題者を除く４名の方の解答作成完了宣言の後に、このスレに直接解答式をお書きください。

この問題に関しては解答用の別スレは作成いたしません。

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