【45歳から】始めたいExcelVBA競馬自動投票＜レース情報＞

（楽天）地方競馬情報サイトのレース情報を自動取得します

▼ 競馬は“投資”に変えられる
票数の偏差値で見えてきた、勝てるレースの本質
▶ まだ「偏差値で競馬を読み解く」基礎ロジックを知らない方はこちら

何か準備しておくものはありますか？

（楽天）地方競馬情報サイトへの自動ログインは済ませておいてください。

前回ご紹介した「（楽天）地方競馬情報サイトへの自動ログイン」は済ませておいてください。

まだの方は、以下の記事をご覧になってくださいください。

【ExcelVBA】＜地方競馬自動投票＞今から聞けないExcelVBA（ログイン）

どうすれば「楽天競馬」サイトのレース情報が取得できますか？

レース情報取得VBAマクロを作成します

「楽天競馬」サイトから自動でレース情報を取得するには次の設定を行ってください。

①レース情報取得マクロ実行ボタンの設置

1	前回作成したExcelブック「rakuten_keiba.xlsm」を開きます。
2	「１．ログイン情報」のNo.4に「開催場数」の追加セルC6には「開催場数」と名前を定義します。（名前の定義の仕方は、該当セルを選択し、[数式][名前の定義]で名前を入力します）
3	レース情報取得マクロの購入右のExcel VBAマクロボタンをクリックし、「レース情報取得マクロ」を購入します。	[maxbutton id=”1″ url=”https://misao-mineo.net/?post_type=product&p=6660&preview=true” text=”Excel VBAマクロ” ]
4	「レース情報取得ボタン」の設置 [開発][挿入][フォームコントロール]の中から[ボタン（フォームコントロール）]を選択し、ログインボタンの下にボタンを設置します。「マクロの登録」ダイアグラムで[新規作成]ボタンをクリックします。
	マクロの貼り付け「レース情報取得マクロ」のすべてをコピーし、すべてを上書きでペースト（貼り付け）します。ダイアグラムを閉じます（右上×をクリックします）。
5	ボタン名の変更作成したボタン名を「レース情報取得」に変更します。
6	マクロの登録「レース情報取得ボタン」を右クリックし、「マクロの登録」をクリックします。「rakuten_raceinfo_Click」を選択し、「OK」をクリックします。
7	新しいシート「Raceinfo」の追加シート最下段の右横の「＋」をクリックし、シートを追加します。追加したシート名を「Raceinfo」に変更します。