【プログラミング入門】Excelでオセロを作って楽しくプログラミングを学ぼう！③

「プログラミングに興味があるけど…」
「VBAを使って作業を効率化できたらなぁ」
「プログラミング勉強したけどわからん（´・ω・）」

等々、プログラミングって結構敷居が高い！
気持ちはわかります。私は、最初にJavaを触りましたが、わからなくて何も面白くなかったです。。
でも！普段使っているExcelならわかりやすいはず！
というわけで、Excelでオセロを作ってプログラミングを楽しく学んでいきましょう。

Excelでオセロを作ろう③

オセロを作って楽しくプログラミングを学ぼう！
第3回では第2回で作成したマクロの中に真ん中に黒白の石を置いていきます。

マクロの内容追記

Microsoft Visual Basic for Applicationsの起動

前回起動しましたが一応おさらいとして、もう一度起動方法を記述しておきます。
Excelを使っている状態でキーボードの「Alt」と「F11」を同時に押しましょう。

セルへ書き込み

マクロによるセルへの文字の書き込み方法ですが以下のような構文を使用します。


Cells(行番号, 列番号).Value = "文字"

この構文を書くことでセルへ文字を書き込むことができます。
前回作成したマクロのプロシージャのメッセージ出力の下に追記しましょう。

第一回目の通りにオセロ版を作成しているのであれば、6行目の5列目が真ん中4マスの左上のマスになります。
そこに対して「○」を入れていきます。
※「’」から始まっている行はコメント行です。VBAでコメントはこのようにかきます。また、この行はプログラムとしては処理と関係ありません。

実際に「はじめから」の図形をクリックしてみましょう。
メッセージが表示されたあとに「○」がセルに書き込まれるはずです。

それ以外の真ん中の石も配置されるようにしていきます。
左上が6行目の5列目だったのでその他の石は以下のようになります。

右上：6行目の6列目
左下：7行目の5列目
右下：7行目の6列目

「はじめから」ボタンをクリックしてみましょう！

盤の左上を表す「定数」を定義する

とりあえず初期の石を配置することができましたが、ちょっと待ってください！
このままだと、オセロ盤を移動したとき（例えばC列を盤の左上にするなど）に修正箇所が多くなります。。
そこで、定数というものを使って場所を表現していきましょう。
具体的に何をするかというと、盤の左上のセルの行と列から真ん中の四マスを計算して出そうという話です。
まずは左上のセルの値を「定数」を使用して表現します。
VBAで定数は下記のように定義していきます。