Excel VBA打开IE浏览器的网页

目的：使用 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                        '定义变量类型为IE
    Set objIE = New InternetExplorer                     '赋予该变量为new IE
     
    objIE.Visible = True                                 '使该IE窗口能被看到
    objIE.Navigate "https://www.baidu.com/"              '打开该IE窗口
 
End Sub

 

---

 3.操作IE打开WEB页面

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

说明：

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