オセロを作りながらマクロVBAを学ぼう№1
ExcelマクロVBAでオセロ（リバーシ）を作っていきながらマクロVBAを学ぶ第1回です。
このシートの作り方で、その後の手間が随分と変わってきますので、しっかりと作ります。
これからマクロVBAを書いていく場所の用意です。
シート名は何でも構いませんが、サンプル画像では「オセロ」としてあります。
A1～J10
L2とL3
文字としては、黒白どちらも「●」になります、白は文字色を白にしています。
盤面の大きさに合わせて設定してください。
M2とM3のコンボボックス
左上隅の□をShiftキーを押しながらドラッグすれば、セルの境界にぴったりと合わせられます。
右下隅の□も同様にShiftキーを押しながらドラッグしてセルの境界に合わせます。
プロパティをクリック
（オブジェクト名）、ここを「cmb1」として下さい、これがVBAで使う名前になります。
コンボボックスに表示されているテキストを変更出来ないようにする指定です。
このコンボボックスをコピーして、M3セルに貼付け。
そして、右クリック→プロパティ→（オブジェクト名）を「cmb2」に変更→「×」
M5のボタン
左上隅と右下済の□をShiftキーを押しながらドラッグしてセルの境界に合わせます。
右クリック→プロパティ
（オブジェクト名）を「btn1」に変更
Captionを「対戦開始」
Fontを選択する右に「…」のボタンが出ます。
この「…」をクリックすると、
ここで、フォントをお好みに合わせて設定したください。
ここまで設定したら、「×」で閉じて下さい。
ここまでで、シートの準備は終わりました。
次は、マクロVBAの準備です。
と、その前に、オプション設定はしておいてください。
これで準備は整いました。
全体の目次
№1．シートの用意と標準モジュールの挿入
№2．ブックを開いたときの処理と初期配置
№3．自分の石を置ける場所の判定の整理
№4．自分の石を置ける場所の判定の実装
№5．シート機能を拡張して今後の準備
№6．黒石白石を交互に打って相手の石をひっくり返す
№7．パス確認、終局確認、石数取得
№8．石を置ける場所の表示とアニメーション
№9．PC対戦の実装
№10．置く場所に重みを付けて少しだけ強く
№11．相手の応手を評価してさらに強く
№12．PC対PCの対戦で強さを確認
№13．パラメーターと重みを調整してさらに強く
№14．やはり「待った」が欲しい
№15．棋譜で対局を再現
№16．これまでを振り返りつつ全体のまとめ
ここまでのサンプルファイルのダウンロード
同じテーマ「マクロVBAサンプル集」の記事
エクセルでファイル一覧を作成
アメブロの記事本文をVBAでバックアップする№1
数独（ナンプレ）を解くVBAに挑戦№1
数独（ナンプレ）を解くアルゴリズムの要点とパフォーマンスの検証№1
ナンバーリンク(パズル)を解くVBAに挑戦№1
ナンバーリンクを解くVBAのパフォーマンス改善№1
オセロを作りながらマクロVBAを学ぼう
他ブックへのリンクエラーを探し解除
Excelシートの複雑な計算式を解析するVBA
新着記事NEW ・・・新着記事一覧を見る
VBA+SeleniumBasicで検索順位チェッカー作成｜VBA技術解説（5月18日）
テーブル操作のVBAコード（ListObject）｜VBA入門（5月12日）
テーブル操作の概要（ListObject）｜VBA入門（5月12日）
VBAのスクレイピングを簡単楽にしてくれるSelenium｜VBA技術解説（5月6日）
Excelワークシート関数一覧（2010以降）｜VBAリファレンス（4月22日）
クラスとCallByNameとポリモーフィズム(多態性)｜VBA技術解説（4月6日）
VBAでのタイマー処理（SetTimer,OnTime）｜VBA技術解説（4月3日）
クラスとイベントとマルチプロセス並列処理｜VBA技術解説（4月2日）
エクセルの日付と時刻のまとめ｜エクセル関数超技（3月6日）
Excelシートの複雑な計算式を解析するVBA｜VBAサンプル集（2月18日）
アクセスランキング ・・・ ランキング一覧を見る
1.ひらがな⇔カタカナの変換｜エクセル基本操作
2.最終行の取得（End,Rows.Count）｜VBA入門
3.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
4.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
5.RangeとCellsの使い方｜ExcelマクロVBA入門
6.変数とデータ型（Dim）｜ExcelマクロVBA入門
7.マクロって何？VBAって何？｜ExcelマクロVBA入門
8.繰り返し処理（For Next)｜ExcelマクロVBA入門
9.とにかく書いて見よう（Sub,End Sub）｜VBA入門
10.セルに文字を入れるとは（Range,Value）｜VBA入門
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
なお、掲載のVBAコードは自己責任で使ってください。万一データ破損等の損害が発生しても責任は負いません。