Execl2003VBA網路爬蟲

excel2003 excel vba selected

faye59 2018-01-17 01:39:35 ‧ 6473 瀏覽

分享至

Excel 2003 VBA 如何getElementById擷取Option標籤下Selected

我想要擷取下拉式選單中的預選資料
因為每個編號查尋出來的網頁結果預選資料都不一樣
HTML

Set mainDocument = myIE.document
Set tagid = mainDocument.getElementById("wcSWRvCtrl$ddlProjectBU")
Set taga = tagid.getElementsByTagName("option")
For i = 0 To 0
Set aa = Sheets("Sheet1").Range("a1:a100").Find("", [a100])
aa = taga(2).innerText
Next i
我只會抓到Option標籤這邊，所以我的taga(2)是固定值，要如何改成變數?
例如另一個編號查出來

P.S Selected是什麼屬性?元素?

看更多先前的討論...收起先前的討論...

faye59 iT邦新手 5 級 ‧ 2018-01-17 04:44:12 檢舉

補上MTHL
<select name="wcSWRvCtrl$ddlProjectBU" onchange="javascript:setTimeout('__doPostBack(\'wcSWRvCtrl$ddlProjectBU\',\'\')', 0)" id="wcSWRvCtrl_ddlProjectBU" disabled="disabled">
<option value=""></option>
<option value="AV">AV</option>
<option selected="selected" value="TV">TV</option>
<option value="MD">MD</option>
<option value="DT">DT</option>
<option value="MP">MP</option>
<option value="ST">ST</option>
<option value="EI">EI</option>
<option value="GD">GD</option>
<option value="IV">IV</option>
<option value="WD">WD</option>
<option value="PD">PD</option>