Excel Maniacs

第240回 連続整数重複無しランダム生成 解答例

89：

{=MOD(MAX(MID(RAND(),ROW($3:$12),6)*(COUNTIF(B$2:B2,ROW($1:$10))=0)/1%+ROW($1:$10)),100)}

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（maronさん）

---------------------------------------------------------------------------------------------------------

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

解答ワークシートをアクティブにしてVBSファイルをダブルクリックして下さい。

セルA1に検証回数が表示され、１万回検証し、問題があればストップします。

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（くまぷー）

 

関数で出来ますか～？ 第240回 連続整数重複無しランダム生成

【問題】

・B3の式を下にコピーして、

・1～10が重複せずに

・ランダムに表示させてください　(maronさん)

 

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

 

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

尚、解答締め切りは０５／０９（土）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

 

英文整序問題作成VBS マイクロソフト・ワード対応

【´･ω･`】：学年主任のリクエストに応えて英文整序問題作成VBS（マイクロソフト・ワード対応版）を

　　　　　　作ったよ。

(●`ε´●)：前のKingSoft_Writer版をほんのちょっといじっただけだろ？！

【´･ω･`】：うん、ほとんど同じ。全然、手間はかかっていない。

　　　　　　だから、使い方も同じだ。例えば・・・

 

　　　　　　Live as if you were to die tomorrow.

 

　　　　　　・・・という英文の

 

　　　　　　Live as if you were to die tomorrow.

 

　　　　　　･･･出題部分をマウスで選択し（赤字の部分とすると）・・・

　　　　　　VBS（Word_Order15_05_03）ファイルをダブルクリックすると選択部分が

　　　　　　ランダムにシャッフルされて下のようになる。

                

                Live   <  1.  to / 2.  if / 3.  you / 4.  were / 5. as  >  die tomorrow.

 

  Word_Order15_05_03をダウンロード

-----------------------------------------------------------------------------------------------------------------

＊単語に番号が付かないものを追加します。

　下のようになります。　（2015/5/11）

Live <if/ die/ to/ as/ were/ you> tomorrow.

Word_Order15_05_11をダウンロード