操作するページは引き続きYahooの乗換案内です。(サンプルソース)
チェックボックス
Yahoo乗換案内のチェックボックスは手段の欄に【空路】【新幹線】【有料特急】【高速バス】【路線/連絡バス】【フェリー】があります。
それぞれのソースコードは下記の通りで、注目はid=~です。タグにidが設定されている場合は、getElementById("~") を使う事で操作できます。
そして、チェックボックスにチェックを入れる場合は、
objIE.document.getElementById(idの値).Checked = True、
チェックを外す場合は、
objIE.document.getElementById(idの値).Checked = False
で操作します。
【空路】
<乗換案内html>
<input type="checkbox" name="al" id="air" value="1" checked><label for="air">空路</label>
<Excelマクロ(VBa)>
▽チェックを入れる場合(True)
objIE.document.getElementById("air").Checked = True
▽チェックを外す場合(False)
objIE.document.getElementById("air").Checked = False
【新幹線】
<乗換案内html>
<input type="checkbox" name="shin" id="sexp" value="1" checked><label for="sexp">新幹線</label>
<Excelマクロ(VBa)>
▽チェックを入れる場合(True)
objIE.document.getElementById("sexp").Checked = True
▽チェックを外す場合(False)
objIE.document.getElementById("sexp").Checked = False
【有料特急】
<乗換案内html>
<input type="checkbox" name="ex" id="exp" value="1" checked><label for="exp">有料特急</label>
<Excelマクロ(VBa)>
▽チェックを入れる場合(True)
objIE.document.getElementById("exp").Checked = True
▽チェックを外す場合(False)
objIE.document.getElementById("exp").Checked = False
【高速バス】
<乗換案内html>
<input type="checkbox" name="hb" id="hbus" value="1" checked><label for="hbus">高速バス</label>
<Excelマクロ(VBa)>
▽チェックを入れる場合(True)
objIE.document.getElementById("hbus").Checked = True
▽チェックを外す場合(False)
objIE.document.getElementById("hbus").Checked = False
【路線/連絡バス】
<乗換案内html>
<input type="checkbox" name="lb" id="bus" value="1" checked><label for="bus">路線/連絡バス</label>
<Excelマクロ(VBa)>
▽チェックを入れる場合(True)
objIE.document.getElementById("bus").Checked = True
▽チェックを外す場合(False)
objIE.document.getElementById("bus").Checked = False
【フェリー】
<乗換案内html>
<input type="checkbox" name="sr" id="fer" value="1" checked><label for="fer">フェリー</label>
<Excelマクロ(VBa)>
▽チェックを入れる場合(True)
objIE.document.getElementById("fer").Checked = True
▽チェックを外す場合(False)
objIE.document.getElementById("air").Checked = False