excel批量提取网页上的文字,网页有几百个,我想提取文字
<liclass="clearfix"><spanclass="name">名称</span><spanclass="value">天使</span></li><licl...
<li class="clearfix"><span class="name">名称</span><span class="value">天使</span></li><li class="clearfix"><span class="name">属性</span><span class="value">神</span></li><li class="clearfix"><span class="name">体力值</span><span class="value">20</span></li>网页又好几百个,网页源代码都类似,我想提取成以下图片样式
展开
展开全部
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的翻页的话,翻页网址是不变的,要用其它方法
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的翻页的话,翻页网址是不变的,要用其它方法
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询