VBA抓取網(wǎng)頁數(shù)據(jù)詳細(xì)教程，舉例抓取網(wǎng)頁中的表格數(shù)據(jù) Sub test() Dim ie, dmt, tbs, i&, tb Set ie = CreateObject("InternetExplorer.Application") '創(chuàng)建一個IE對象 With ie .Visible = True '顯示它 .navigate "http://data.eastmoney.com/dxf/default.html" '加載某個頁面 Do Until .ReadyState = 4 '等待頁面加載