itIdeen


あみだくじ


エクセルで、あみだくじ。

［ブログ］
http://engi.cocolog-nifty.com/sirenai/2016/08/excelvba-b72b.html

［VECTOR］
https://www.vector.co.jp/soft/winnt/home/se517128.html


「エクセルのマクロを使ったあみだくじです。
パターンは10種のみとなっています。
パターン切り替えはボタンにて行います。
あみだくじというよりも、エクセルで経路表示するのが特徴と思っています。
図形を移動させるコードのサンプルになると思います。

「あみだ3」シートで利用します。
他の「あみだ」シートは、あみだ3シートでの図形移動等の機能を実現するための、作成の経過のシートです。

遊び方は、
一つ選んであみだ結果を知るなら、番号を選んでから、GOボタンをクリックします。
複数人で行う場合は、あらかじめ番号を決めてから、
ALL GOボタンをクリックすると良いかもしれません。

図形移動のコードの原型は、「Module1.次のセル判定」です。
アクティブセルを移動させていくコードですが、このコードを元に、アクティブセルに図形を表示させることで、図形移動をさせています。
あみだ1シートの「Start-1」を右クリック〜マクロの登録〜編集でコードを見ることができます。」




https://www.youtube.com/watch?v=B2UVFdzx6kM






itIdeen