VBA程序中如何自动打开网页

大家好，我们今日继续讲解VBA代码解决方案的第83讲内容：如何利用代码让VBA程序打开指定的网页.现代的社会对于网络的依赖是前所未有的，那么，有么有办法让VBA代码可以打开指定的网页呢？当然可以。

今日讲的要利用到FollowHyperlink方法，这种方法是对指定超链接进行处理以下载目标文档，然后将该文档在适当的应用程序中显示出来，语法如下：

expression.FollowHyperlink(Address, SubAddress, NewWindow, AddHistory, ExtraInfo, Method, HeaderInfo)

其中参数：

a) expression是必须的，返回一个Workbook对象。

b) Address是必须的，String类型，目标文档的地址。

c) SubAddress是可选的，目标文档中的位置，默认值为空字符串。

d) NewWindow是可选的，Variant类型，如果该值为True，则将目标应用程序显示到一个新窗口中。默认值为False。

e) AddHistory 是可选的Boolean类型为 要添加到当前日期的历史记录文件夹的链接。

f) ExtraInfo是可选的String类型， 指定用于 HTTP 的信息的字符串或字节数组。 例如，此参数可用于指定图像映射的坐标或窗体的内容。 它还可以指示 FAT 文件名称。 该方法的参数确定如何处理此额外信息。

g) Method是可选的MsoExtraInfoMethod指定发布或附加 ExtraInfo 的方式。

h) HeaderInfo是可选的String类型指定 HTTP 请求的标头信息的字符串。 默认值为一个空字符串。 您可以使用以下语法将几个标头行组合到单个字符串："string1"& vbCr &"string2"。 所指定的字符串自动转换为 ANSI 字符。 请注意，HeaderInfo 参数可能会覆盖默认的 HTTP 标头字段。

使用VBA可以打开网页，如下面的代码所示。

Sub MyHyperlink()

ActiveWorkbook.FollowHyperlink _

Address:="https://www.baidu.com", _

NewWindow:=True

End Sub

代码解析：

MyHyperlink过程使用FollowHyperlink方法打开百度。

代码截图：

这时就出现了头条的登陆界面。

今日内容回向：

1 VBA如何能登陆指定的网页？

2 FollowHyperlink方法的意义是什么？