。VBA爬虫，只要是公开页面，都可以抓。但是登录页面我没试过。其实很简单，就是抓一段字符，你研究出字符的规律，自动程序删减提取，再存到Excel或者本地数据库就可以了。

将_页中表的数据输出到excel中。下面会出来要添加网页的内容和黄色箭头，单击要选择的表旁边的黄色箭头，可以看到点击后黄色箭头变成绿色的对号，这表示内容已经选中了，然后单击导入。

VBA网抓常用方法1、xmlhttp/winhttp法：用xmlhttp/winhttp模拟向服务器发送请求，接收服务器返回的数据。优点：效率高，基本无兼容性问题。缺点：需要借助如fiddler的工具来模拟http请求。2、IE/webbrowser法：创建IE控件或w...

Cells.ClearContentsSetoDoc=CreateObject("htmlfile")WithCreateObject("WinHttp.WinHttpRequest.5.1").Open"GET","",False.Send.WaitForResponseoDoc.body.innerHTML=.re

可以，通过Excel——数据——自网站，录取一份代码，根据代码进行适当修改，提取所需数据。举例：Sub读取网页数据()DimsAddressAsStringFori=1To90sAddress=Range("A"&Range("A:A").Rows.Count)...

下面的代码就可以：OptionExplicitSub批量获取网页内容()Dimhttp,Pols,Arr,i,uSethttp=CreateObject("Microsoft.XMLHTTP")i=1ForEachuInArray("url1","url2")http.Open"POST...

真实数据应该在里面，将源代码，用split、instr等函数来提取。或者用正则表达式来提取。不过VBA里面处理字符串，比较费脑筋。建议用JS代码处理方便

'已打开网页里面查找百度网，对其进行输入数据DimoWinAsObject,ExistedAsBooleanExisted=FalseWithCreateObject("shell.application")ForEachoWinIn.WindowsIfoWin.locationurl="https://www.baidu....

URL="目标网页".Open"get",URL,False.setRequestHeader"Host","xxxxx".SendQ1=.responseTextQ1=Replace(Q1,""","")Q1=Replace(Q1,Chr(9),""

'准备工作：1.用IE打开百度2.调用函数GetIE'代码搜索标题包含百度的IE窗口，然后控制打开hao123，最后保存为c:\myhtml.txtOptionExplicit''工程要引用"MicrosoftHTMLObjectLibrary"'P...