excel批量提取网页上的文字,网页有几百个,我想提取文字
发布网友
发布时间：2022-04-23 13:11
共1个回答
热心网友
时间：2023-11-01 08:52
Dim myQuery
With ActiveSheet
.Cells.Delete
.[a1] = "Conneting, Please Wait..."
Set myQuery = ActiveSheet.QueryTables _
.Add(Connection:="URL;网址", _
Destination:=.Cells(1, 1))
End With
With myQuery
.Refresh
End With
循环更换网址运行上面的代码取数据
如果是ASPX.NET的翻页的话，翻页网址是不变的，要用其它方法
