[VBA ] 請教如何執行網頁地址欄位鄉鎮區下拉欄位

看板Visual_Basic作者 (初來)時間3年前 (2020/07/12 10:54), 3年前編輯推噓0(0010)
留言10則, 2人參與, 3年前最新討論串1/1
縣市: <select name="WATER_ADDR_addx" class="form-control" id="WATER_ADDR_addx" style="width: 7em;"> <option value="" selected="">請選擇</option> <option value="B">基隆市</option> <option value="C">新北市</option> ----部分忽略 </select> 鄉鎮(區): <select name="WATER_ADDR_addx_COUN" class="form-control" id="WATER_ADDR_addx_COUN" style="width: 7em;" onchange="javascript:if (this.value=='') {document.all['WATER_ADDR'].style.display = 'none'} else {document.all['WATER_ADDR'].style.display = ''};"> <option value="000">請選擇</option> </select> ----部分忽略 <input name="WATER_ADDR" id="WATER_ADDR" style="width: 50%;" type="text" placeholder="請輸入用水地址" value="" data-val-required="用水地址 欄位是必要項 。" data-val="true"> --------------------------------分隔線------------------ 不知該如何讓 鄉鎮(區)欄位(WATER_ADDR_addx_COUN)選擇指定執行(ex.金山區) 目前我可以執行部分 部分忽略 Set a = .document.all("WATER_ADDR_addx") For i = 0 To a.Options.Length - 1 If a.Options(i).innerText = "新北市" Then a.Options(i).Selected = "true" End If Next .document.all("WATER_ADDR").Value = ActiveSheet.Cells(number, 3) -------------------------------------------------------- 先感謝留言的各位 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 36.236.5.89 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1594522483.A.915.html

07/13 15:11, 3年前 , 1F
你搜一下下拉式選單就有很多例子了 我上星期才爬的 大
07/13 15:11, 1F

07/13 15:11, 3年前 , 2F
多都卡在fireevent onchange沒做
07/13 15:11, 2F

07/13 19:08, 3年前 , 3F
我爬文有加.document.all("WATER_ADDR_addx_COUN").F
07/13 19:08, 3F

07/13 19:09, 3年前 , 4F
ireEvent ("onchange")
07/13 19:09, 4F

07/13 19:10, 3年前 , 5F
在想說哪裡用錯了方法
07/13 19:10, 5F

07/13 19:10, 3年前 , 6F
沒有反應
07/13 19:10, 6F
※ 編輯: littleyan93 (36.236.5.89 臺灣), 07/13/2020 19:11:47

07/14 11:57, 3年前 , 7F

07/14 12:00, 3年前 , 8F
你爬這篇試試 我也是都用focus,selectindex,fireevent
07/14 12:00, 8F

07/14 12:00, 3年前 , 9F
還有是getelementbyid直接指名ID ,再不行等高手了
07/14 12:00, 9F

07/14 12:00, 3年前 , 10F
我也才摸兩個禮拜
07/14 12:00, 10F
文章代碼(AID): #1V2djpaL (Visual_Basic)
文章代碼(AID): #1V2djpaL (Visual_Basic)