VBA程序中如何自动打开网页,让自媒体头条号自动登录
author:一佰互联 2019-03-26   click:353

简介:大家好,我们今日继续讲解VBA代码解决方案的第83讲内容:如何利用代码让VBA程序打开指定的网页.现代的社会对于网络的依赖是前所未有的,那么,有么有办法让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://mp.toutiao.com", _

NewWindow:=True

End Sub

代码解析:

MyHyperlink过程使用FollowHyperlink方法打开头条的主页。

代码截图:

VBA程序中如何自动打开网页,让自媒体头条号自动登录


运行窗口:

VBA程序中如何自动打开网页,让自媒体头条号自动登录


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

今日内容回向:

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

2 FollowHyperlink方法的意义是什么?

本文仅代表作者个人观点,不代表巅云官方发声,对观点有疑义请先联系作者本人进行修改,若内容非法请联系平台管理员,邮箱qq2522407257。更多相关资讯,请到巅云www.yinxi.net学习互联网营销技术请到巅云学院www.yx10011.com。