…の単勝オッズを取得 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…

昨日修正したJRA 単勝オッズ 取り込みサンプル下記 ken3memo.hatenablog.com ですが、発走時刻とオッズ時刻が正しくない と連絡を速攻でいただく。最後まで、確認をしていなくてスミマセン。すぐに修正をしてみます。 ※またまた、ライブネタにして、恥を重ねてみます。。。いつものライブ デバッグ動画 VBA IE操作 バグ修正 発走時刻とオッズの時刻が変 JRA 単勝オッズ の取り込み デバッグ - YouTube www.youtube.com1.バグ・不具合…

…います。 12/5にJRAがHPの仕様を変更したためだと思うのですが、 単勝オッズ取り込みが出来なくなってしまいました。 「枠番のテーブルが見つかりません」 というメッセーッジボックスが出るので 単勝オッズ取り込みができない はやくなおせカス などなど、氷山の一角でこれだけ反応があったので、 怖いなぁ・・と思いつつ、デバッグを開始する1.バグ・不具合の再現2.原因の特定 処置・対策2.1 レース番号が押されていない strRACE = nRACE & "R" 'R1など 文字…

…」 試したのですが、JRAのHBのリンク数は13個でした。JRA側が2017/08から何か変更したのでしょうか？ 私のサンプルがご迷惑をかけたみたいです ※プログラムの作りが甘いからかも・・・やってみたら、動いてしまったのですが、 不具合を再現するために、イロイロと操作をしてみたら原因が判明・・・再現手順: ホームページから開催日を反転させて(範囲指定して)手動でコピーすると 2回新潟9日 と後ろにスペースや改行が入って ExcelのB2セルにコピーされてしまいます。この状態…

…笑ってくださいね。 JRA サイトから レース結果をExcelに取り込む・・・三流プログラマー の 独り言 ライブ プログラミングほか テスト中 - YouTube www.youtube.com 下記の質問をいただきました。 JRAのオッズ取り込みを改造して ﾚｰｽ結果を取り込むことにチャレンジしていますが 中々、思うようにいきません質問させていただきます ①JRAのﾚｰｽ結果取り込みです （※前提として、競馬開催の当日で12Rまで終わっていない場合） 最終ﾚｰｽまで終わっ…

…ツール？ライブラリをJRAが使い始めた？>JRA-IPATのメニューが新しくなり これって？最近の話なのですか？ ※私自身、昔のサンプル放置していて・・・すみません。単純な、 SELECTタグの選択じゃなくなったとすると、 少し難しいかもしれません。https://app.codegrid.net/entry/angular-tips-1 は、 そのツール？ライブラリの中での話で、 VBA側とは違いそうですし、、、私も、無知で、ヒントすらだせなくてスミマセン。excel vb…

…セージを無効にする JRA入出金メニュー ken3memo.hatenablog.com や VBA IE操作 ニセのpromptとalert() を 挿入する そんな実験 ken3memo.hatenablog.com で '暗証番号を入れ、実行する '確認メッセージで はい を 答えたい ≠≒ 確認を必ず はい(true)にする Dim ele 'エレメント(script)を1つ作りたいので。 Set ele = objIE_I.document.createElemen…

…ッセージありがとう。JRAオッズ取得の テストで使用したExcelブックを test/20170820.zip に保存しました。アレンジして使ってみてください。コードだけで、動くブックを保存していなくてすみませんでした。 次回から、あるていどまとまったら、ブックを公開してみようと思います。 ken3memo.hatenablog.com ken3memo.hatenablog.com 2017 JRA 単勝オッズをExcelへ取り込むVBA - YouTube www.you…

…解説動画です。。。 JRA ３連単オッズ 取得プログラム作成前の確認をライブで Ken3 ライブ プログラミング テスト中 - YouTube www.youtube.com1.現物の確認実際のHPを見たり、 ソースを見たりして、 TABLEの構造を探ります。1.1 自作のIE TABLE確認ツールのデバッグを兼ねて探ってみる 少し前 テストで作成した ken3memo.hatenablog.com ↑自前のTABLE取り出しツールのデバッグを兼ねて、 ３連単の構造を探ってみ…