閑話・・・数字パズル、数独をVABマクロで解く（part３／３） プログラムの展開

　ＶＢＡマクロはプログラムを組むのも面白いが、プログラムがうまく作動しているのかを途中を見るのもワクワクして楽しい。
　今回、計算の展開をコマ撮りして動画にしてみた。実際はもっと滑らかにできるのだがブログにアップできるファイル容量に限界があるようで、コマ抜きしてさらに４分割せざるを得なかった。


ステップ１
最初に問題のスペースのカラムのところに"123456789"を代入。
Ａｎｓｅｗのカラムにも問題の数字を転写。
　


ステップ２
数字の判っているカラムの縦一列、横一列、該当するブロックすべの"123456789"からこの数字を抜く。数字を全て抜き終わって文字（数字）が１個になったらそのカラムの数字となる。さらにこの数字を縦、横、ブロックの文字を抜く。これの繰り返し。
難易度４クラスまでならこの操作で答えが出るが、この問題の場合は、残った文字が１個になるのは右端、上から３番目の”2"だけ。


この操作の最後の画面。残った文字が２個だけのカラムが、左１列目の１行目、同８行目、左から６列目の２行目の３箇所ある。


ステップ３
残った文字が２個だけのカラムの合計６個の数字を順に仮置きして計算を続ける。
まずは第１列１行目の”3”から始める。

これは正解なし。次の”9”、そして次のカラムの”1”も不正解。

そして次の”3”を仮置きして計算すると見事に正解が見つかった。



ただそれだけのことだが、プログラムを組んだことのある人はこの面白さがわかってもらえると思う。きっと。