fieldset{padding:10px;}
如何用VBA取这个网页中第2页或第3页的源码?在下面这个网页中http://www.p5w.net/kuaixun/index.htm中页面的下边有这样的按钮:上一页 下一页它共有10页.如何用VBA取得下一页即第2页或者第三页的源码?——解决方案——————————————————–你是想要HTML的源代码还是网页?如果是网页的话,可以这样操作:VB code
Sub Macro1()Dim i As LongFor i = 1 To 9Worksheets.Add After:=Sheets(Sheets.Count)' With ActiveSheet.QueryTables.Add(Connection:= _ "URL;http://www.p5w.net/kuaixun/index_" & i & ".htm", Destination:=Sheets(Sheets.Count).Range("$A$1")) .Name = "index" .Refresh BackgroundQuery:=False End With NextEnd Sub有勇气并不表示恐惧不存在,而是敢面对恐惧克服恐惧