網址是： https://baike.baidu.com/item/環太平洋：雷霆再起/22038038?fr=aladdin
需要提取里面“中文名”等的內容，自動填寫在自己制作的Excel 檔案上（如附件），如果沒有資訊就用“/”代替
可以找到中文名的innerText，但是就是不知道怎么去除dt下一個節點的dd的innerText，已經試過子節點和兄弟節點了，就是拿不到dd的innerText "環太平洋：雷霆再起".
<dt class="basicInfo-item name">中文名</dt>
<dd class="basicInfo-item value">
環太平洋：雷霆再起
</dd>
uj5u.com熱心網友回復：
不要搜索節點了，直接搜索字符截取<dt class="basicInfo-item name">中文名</dt>換行符<dd class="basicInfo-item value">換行符
換行符</dd>
這兩行特征符之間的內容就是了
uj5u.com熱心網友回復：
剛開始學VBA，可以寫這個代碼給我嗎？thxuj5u.com熱心網友回復：
剛開始學VBA，可以寫這個代碼給我嗎？thx
uj5u.com熱心網友回復：
是這種的嗎？我只做了個別的例子，只要百科上顯示的條目都能抓到
uj5u.com熱心網友回復：
注釋掉所有On Error Resume Next陳述句，在VBA IDE中運行，出錯后點擊除錯，游標會停在出錯的那條陳述句處，
或者
事先在懷疑可能有邏輯錯誤的陳述句處設定斷點，運行經過斷點時中斷，
此時可以在立即視窗中使用
?變數名
或
?函式名(函式引數)
或
程序名(引數)
輔助除錯。
uj5u.com熱心網友回復：
我就是想達到這樣的效果，謝謝啊，可以給你的那個代碼我參考一下嗎？
uj5u.com熱心網友回復：
我就是想達到這樣的效果，謝謝啊，可以給你的那個代碼我參考一下嗎？
uj5u.com熱心網友回復：
我就是想達到這樣的效果，謝謝啊，可以給你的那個代碼我參考一下嗎？轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/46919.html
標籤：VBA
上一篇：VBA中如何Post Json