…語 #Excel #JRA #スクレイピングここから、ソースコードとライブで使用した台本固定値でテスト 開催地をPOST後1回だけHTMLソースを受け取り、その中で馬券の種類別にループさせる本日、代替開催でJRA競馬が開催されているので、 テストしてみます。 ※で、新たな枠連ぬけのバグを見つけたり・・・1.まず、テスト結果を見せる1回東京4日 pw15orl00052026010420260210/6F でテストする // 26/02/10 カンマ区切りで受け取った馬券の種類…

…りませんか？今回は、JRAのレース結果ページを題材に、M言語の神関数''「Html.Table」''を使って、CSSセレクター（クラス名指定）でピンポイントにデータを抽出するテクニックを紹介します。 AIが動画と台本からブログを作成しました 紹介動画：なぜか空白？クラス指定の落とし穴と解決策 動画内では、実際にコードを書きながら「なぜかデータが取れない…」というトラブルを解決していく過程を公開しています。パワークエリ中級者へのステップアップに最適です！【Excelパワークエリ…

…記の再生リストから:JRAオッズ取得関係の再生リストを紹介します https://www.youtube.com/playlist?list=PLBFC80A8658C305CE ↑未解決や単体テストの動画が多いのですが、拾い読みてください。 1.開催を全て取得(ここは固定) 03:14 前回ソースを貼り付けてテストする https://www.youtube.com/live/tC_84sHW3dg?si=L4CT6TyzDv-KB7fq&t=194これは、前回までのコード…

JRA全レースのCNAMEを一括書き出し！パワークエリの関数ループで自動化にチャレンジ JRAのオッズデータを分析する際、毎回「開催地」や「レース番号」ごとにCNAMEパラメーターを手動でコピペするのは苦行ですよね。今回は、メニュー化の前段階として、''パワークエリの「関数化」と「ループ処理」''を駆使し、全開催地・全12レースの単勝CNAMEを一括でテーブルに書き出す方法を紹介します。 AIにブログ編集も依頼しました・・・ 今回のチャレンジ内容 開催一覧（中山・京都・小倉な…

…celパワークエリでJRA単勝オッズを一括取得！List.Transformで12レース全自動読み取り JRAの公式サイトから1レースずつデータを取るのは大変ですよね。 「1つのレースは取れるけど、12レース分をループさせる方法がわからない」 そんな悩みを解決するために、パワークエリを関数化して一気に読み込む「''VBA不要の自動化テクニック''」をまとめました。 処理のイメージと[このブログをAIで作成したことを伝える] 今回やりたかったこと 開催地（中山、京都など）の情報…

…wer Query】JRA 3連単オッズ「人気順」が取れない！隠しパラメータを暴いてPOST送信で取得する方法 こんにちは、三流プログラマーのKen3です。 今回はYouTubeの視聴者さんからいただいた、「JRA（日本中央競馬会）の3連単オッズを『人気順』でPower Queryを使って取得したいが、うまくいかない」という質問への回答を備忘録としてまとめます。 通常、WebスクレイピングはURLを指定してデータを取得しますが、JRAのサイトのようにJavaScriptで動的…

JRA3連単の質問について (25/11/29) 質問 ３連単の取得方法がわかりません。 馬連などのソースは、以下のような形式になっています。 <a href="#" onclick="return doAction('/JRADB/accessO.html', 'pw154ou1005202504030320251011Z/D5');" しかし、３連単の場合は以下のようになっています。 <a href="#" onclick="return doAction('/JRADB…

…wer Query】JRAオッズ自動取得！JavaScript「doAction」で動くサイトを攻略するPOST送信徹底解説 概要 「Webサイトからデータを取得したいのに、なぜかうまくいかない…」そんな経験はありませんか？多くのサイトで採用されているJavaScriptの「doAction」という仕組みの裏側を解明し、Power QueryでPOST送信を再現する方法を初心者向けに徹底解説します。 この動画では、JRA（日本中央競馬会）の公式サイトを具体例に、普段のURLア…

…の単勝オッズを取得 JRAのオッズ取得 https://www.youtube.com/watch?v=dB4c-yTiz7Y www.youtube.com↑のパラメーターを変えただけです、設置方法は動画を見てください。#エリザベス女王杯 のオッズを取得する動画内で作成したパワークエリのソースコード strPARA = Text.ToBinary("cname=pw151opS305202404081120241027Z/19"), を #エリザベス女王杯 に対応するには、…

JRA単勝オッズ取得を自動化！Excel Power Queryでレース名と時刻も表示する方法 競馬予想をする上で、最新のオッズ情報は欠かせませんよね。 JRAのWebサイトから手動でオッズをコピー＆ペーストするのは面倒...と感じている方もいるのではないでしょうか？ そんな悩みを解決するのが、Excel Power Queryです！ Power Queryを使えば、JRAのWebサイトから単勝オッズを自動で取得し、さらにレース名やオッズ時刻、レース番号までまとめて表示できま…

…tps://www.jra.go.jp/JRADB/accessO.html", strPARA = Text.ToBinary("cname=pw151ouS309202402041220240331Z/EB"), strHEAD = [#"Content-Type"="application/x-www-form-urlencoded"], ソース = Web.Contents(strURL, [Headers = strHEAD, Content = strPARA])…

… #webクエリ #JRA #大阪杯 #デバッグ https://youtube.com/live/9ehjI5uhyWE 目次 00:00 あいさつ 00:40 1.まず、Web Formの入力データをPOSTで送るページを簡単に説明する 02:25 1.1 HTMLソースを確認すると 04:33 1.2 METHOD="GET"のページ 10:51 1.3 METHOD="POST"のページ 15:21 2.POST送信のテスト METHOD="POST"のページ結果を受…

JRA競馬データ収集取得の質問で 1.ExcelのパワークエリでJRAのページからソースコードを取得したい 2.文字化けしてしまいます 3.DoActionが解りません (転載不可希望なので、勝手に要約) とあったので、日曜日なのでチャレンジ。※本当は昨日の土曜日からやってて、進展なし・・・#msexcel #パワークエリ #Webクエリ #ソースコード #文字化け #PowerQuery #HTMLソース #TABLE #マイクロソフトエクセル https://youtub…

JRA オッズ取得 馬連にチャレンジしてみた Youtube LIVE↓でプログラムの説明を行ってみた。 https://youtube.com/live/8LA0P3fDvN0 youtube.com と、言っても、 一部リンク条件の修正で、 リンク先の"ワイド"の文字を"馬連"に直しただけです。00:00 1.まず、実行結果から見せる テスト済みなので、実行結果から見せる不具合: 馬連 ウマレンの読み上げが、 バレンと読んでしまう03:38 2.馬連オッズ取得 簡単なコー…

…。 今年に入ってからJRAの画面がVBAで取れなくなりました。 ・ ・ 出馬表、オッズ、レース結果、馬情報を取得するVBAを作成し予想していました。が今できません。 ・ ・ 教えて欲しいのは strURL strPARA strHTMLの文字列切り出し検索方法です。 ソースは a href="/JRADB/accessS.html?CNAME=pw01sde1006202301061120230115/48"です レース番号の判定方法です。 と質問をいただきました。レース結果…

…#マクロ #競馬 #JRA #VBA #デバッグ #テスト1.開催日・場所は、流用する 単勝オッズの取得から、 開催日と場所の選択は単勝オッズ取得 ken3memo.hatenablog.com https://www.youtube.com/watch?v=RjZZUq40gxY から流用しました。2.三連複のオッズを押すここも、前回から流用(探す条件:ワイドを3連複に変えただけ)'リンクから、レースのTR行を探し、列 ここでは3連複などを返す 20221001追加修正 s…

JRAのホームページから、 ワイドと三連複のオッズを取得したい と質問があったので、 まず、ワイドのオッズ取得にチャレンジしてみます。私Ken3が大好きだったIEのサポートが終了したので、 MSXML2.XMLHTTP と CreateObject("htmlfile")を使用して JRAオッズ取得 ワイドのオッズ取得に挑戦してみました。#JRA #競馬 #オッズ取得 #ワイドオッズ #IEサポート終了 #MSXML2.XMLHTTP #htmlfile #デバッグ #Exc…

…elete /tn JRA_AUTO_TEST /f ECHO 削除終了 pause にしました。3.単純に実行すると、エラー: アクセスが拒否されました D:\JRA_TEST\20220522>ECHO タスクの削除 タスクの削除D:\JRA_TEST\20220522>schtasks /delete /tn JRA_AUTO_TEST /f エラー: アクセスが拒否されました。D:\JRA_TEST\20220522>ECHO 削除終了 削除終了D:\JRA_TEST…

… Function JRA_Bodyからオッズの時刻を返す(oDocument As Object) As String Dim strTEMP As String Dim strRETURN As String 'リターン値 Dim n As Integer 'errでリターン値を初期化 strRETURN = "ERR 文字列が見つかりませんでした" 'HTMLのBODYテキストを代入 strTEMP = oDocument.body.innerText 'まず最終オッズ…

…つける。 TEST_JRAオッズ取得 など、任意の名前3.1 操作を設定する ここでは、テスト用の オッズ取得3.vbs を選択する3.2 トリガー(実行時刻と繰り返しをセット) 設定、今回は一回にします。※毎週日曜日など、安定稼働してきたら・・・テストしましょう 繰り返し間隔を 今回は5分としました。※二回目を早く実行してほしかったので、現在時刻を見て、テスト開始時刻を設定有効期限を開始の10分後、2回で止めたかったので。※通常は最終レース後の時刻かな4.OKを押して、タス…

….Open("d:\JRA_TEST\20220508\pptest.pptx") 'WScript.Sleep(1000) '1秒待つ ※これが無いと、下の.Runがうまく動作しなかった、なぜ？ 'あれ？無くても動いた、気になるけど、なくていいか。 oApp.ActivePresentation.SlideShowSettings.Run 'スライドショーの実行 F5的なヤツ For p=1 To 3 'ループでとりあえず3ページ WScript.Sleep(5000) '…

…に 00:25 1.JRAのHPを表示させます 00:39 2.ソースを表示します 01:29 2.1 ソースの頭でjavascriptのコードがまとめてインクルード 02:02 2.2 doActionのコードをみると 03:22 2.3 元のソースでcommForm01を探すと 04:42 3.終わりのあいさつ1.JRAのHPを表示させます2.ソースを表示します ここで、onClick=doActionを探しますが、 本体のコードが見つかりません。2.1 ソースの頭でja…

…oAction('/JRADB/accessO.html', 'pw151ouS305202202040120220501Z/96');"><img src="/JRADB/img/race_number/race_num_1.png" alt="1レース"/></a></li> <li><a href="#" onclick="return doAction('/JRADB/accessO.html', 'pw151ouS305202202040220220501Z/4B'…

…ame = "c:\JRA_TEST\20220501\20220501単勝オッズ東京.xlsm" oApp.Workbooks.Open sFileName WScript.Sleep 500 '1.3 マクロの実行 oApp.RUN "ie_JRA単勝オッズをレース別に複数蓄積する" WScript.Sleep 500 '1.4 ブックを閉じる oApp.ActiveWorkbook.Close 'ブックを閉じる '阪神 '1.2 ファイルを開く sFileName = …

…？ 07:23 3.JRAオッズ取得を例題にデバッグ 08:17 文字化けの説明 10:00 CreateObject("htmlfile")でDocumentを作り 10:36 リンクからオッズのAタグを取り出す 12:02 URLとパラメーターを切り出す 12:57 POST処理 URLとパラメータをPOSTしてHTML結果をGet 13:48 取得したHTMLをデバッグ用テキストファイルへ落とす 14:22 再度 CreateObject("htmlfile")でDoc…

…= Split(objRANGE.Cells(1, 1), vbLf)2.Characters(Start:=開始位置, Length:=文字数).Font.Size = フォントサイズ セル内のフォントを部分的に変更したかったので、 マクロ記録された .Characters を使用する3.エラーチェックで分割された文字列の数を数える 必ず固定の改行があると決めつけると痛い目みるので、 UBound(strBOX) などで、改行の行数をチェックしてみた。 Option Exp…

…でした。 ＞やはり、JRAHPサイトの都合によるProg.変更等により不都合が生ずるものなのでしょうか。 ＞マクロ上で次ボタン押して次レースのデータ自動的に取得してゆくことは難しい事なのでしょうか ＞教えていただけませんか。 ＞また別にそうでないとすれば、 ＞馬単オッズ表（馬番順）だけでもマクロの基本モジュールをご紹介願いませんでしょうか。 メッセージありがとうございます。 他の方たちからも、 指定時間に自動実行したい や 他の種類の取り込み・・・ 競馬ファンの人たちは熱い志…

… Sheet2です JRA競馬のオッズ取得だと、 表の左上 .Rows(0).Cells(0).innerText = "〇〇"で判断しているが、 形の違う表から(テストで現在3パターン) ゼッケン,名前,前回1,前回2,前回3,前回4,前回5 の列を探して取得したい、指定した列を取得したい。そんな感じかな。 SQL文ならSelect ゼッケン,名前,前回1,前回2,前回3,前回4,前回5 From Web上の表1Select ゼッケン,名前,前回1,前回2,前回3,前回4,…

…ださい エイターの jra の単勝2取得であの午前中の時刻テストという形であの 清酒あの修正したんですけどあの自国の人がはの後に修正したんであの 13実が3分とかの すいません現在4つの取得ですねこれはあのそのままの君家であの n っていうか あの花の現在おっつー カラーの6持ち引いて6文字取り出すって感じであの 時刻を決め打ちであの13時03分とかの6文字決め打ちで取り出してたんですねで これが 午前中の場合あの例えばの3:03と母の 御餅となってあの風合いになるか どうか…

…le> キッカケは、JRA単勝取り込みのデバッグしたライブ デバッグ JRA単勝オッズの取り込みに失敗 バグの再現と修正 Excel2016 VBA IE表の取り込み - YouTube の終わりに、 チャットのコメントで テーブルのOuterhtmを貼り付けたほうが簡単だよ と アドバイスをいただいたことです。58:27 ​テーブルのOuterhtmをクリップボードに取り込んで PasteSpecial Format:="テキスト", NoHTMLFormatting:=T…