JRA公式競馬データ配信サービス JRA-VAN Data Lab.

JRA-VAN DataLab.

競馬ソフト開発コーナー

JV-Dataの使い方あれこれ

記事リスト  |  新着記事  |  ワード検索  |  過去ログ
タイトルRe: JVRSSで1日の最大レース数を知るには?
投稿日: 2016/02/08(Mon) 17:17
投稿者JRA-VAN ソフトサポート
JRA-VANソフトサポートの竹下です。
DataLab.サービスをご利用頂きまして誠にありがとうございます。


(質問1)
まず、JVRSSでその開催日のレース数を取得することはできません。場数も同様
です。

そのため、ループ処理に想定される最大値を設定し、
判定前に書き込んだセルの値を検索して
" #JVError"であった場合処理を抜け、
その時のカウント数で判断が可能かと思われます。

下記に例を記載致します。

【コード例】

Dim count As Integer

count = 0

' レース数取得
For p = 1 To 12 '12レース分
Range("A" & p).Value = "=JVRSS|'00121" + F
ormat(p, "00") + "'!" + "RA競走名本題"
;

If Range("A" & p).Value = " #JVError" Then
'判定に使用したセルの"#JVError"を空文字に置換します。
Range("A" & p).Value = ""

'レース数表示
Range("A" & p + 1).Value = "レース数:" + CSt
r(count)

Exit For
ElseIf IsError(Range("A" & p).Value) Then
'セルエラー時の処理
End If

count = count + 1

Next p


上記はあくまで一例ですので参考情報としてお考えください。

(質問2)
質問1で回答させていただきました方法が、
JVRSS(JVError)の検知になります。
申し訳ありませんが、ご了承ください。


以上、よろしくお願いいたします。
- 関連一覧ツリー(● をクリックするとツリー全体を一括表示します)
返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)
おなまえ
Eメール
タイトル
メッセージ   文字モード 図表モード
URL
パスワード (英数字で8文字以内)
  プレビュー
- 以下のフォームから自分の投稿記事を修正・削除することができます -
処理 記事No パスワード
ウィンドウを閉じる