目的：使用 Excel VBA 进行网页抓取（web scraping）

1. 运行IE的前设置（setting）

2.输入代码进行IE调取（Navigate）

3.操作IE打开WEB页面

 

•  

  1. 运行IE的前设置（setting）

   

• 打开VBE窗口,工具→参照设定。
• 

 勾选以下两个选项

  Microsoft HTML Object Library

  Microsoft Internet Controls

• 

---

2.输入代码进行IE调取（Navigate）

新建一个模块，然后输入以下代码。（注意：如果第一步没设置好，第二步是无法运行的）

Sub MySub()Dim objIE As InternetExplorer                        '定义变量类型为IESet objIE = New InternetExplorer                     '赋予该变量为new IEobjIE.Visible = True                                 '使该IE窗口能被看到objIE.Navigate "https://www.baidu.com/"              '打开该IE窗口End Sub

 

---

 3.操作IE打开WEB页面

 按F5运行后，打开百度网站。网站处可任意替换。

说明：

如果不想让该网页出现(网页数据抓取即可，不需要展示给用户看)，可以设置visible为False，不仅让程序在跑的时候有种神秘感，还能稍微加快一点速度。