如何在Form表单中添加WebBrowser控件，vba编程学习

vba 编程中，如果需要显示某个网页的内容可以使用WebBrowser控件来实现。

方法也比较容易，下面介绍一下如何在Form中添加WebBrowser控件。

１、打开Windows Excel，同时按ALT+F11键，调出VBE编辑器。

２、菜单栏中选择插入、用户窗体。添加一下空白窗体。

３、菜单栏中选择视图、工具箱。（如果工具箱是灰色不可选择，单击一下窗体即可选）

４、在工具箱面板里右键单击鼠标，选择附加控件，调出附加控件选择框。

５、在可用控件里找到，Microsoft Web Browser，选中，单击确定按钮。这样，工具栏中就添加了一个地球图标，就是ＷebBrowser控件。

６、单击ＷebBrowser控件图标，在新建的窗体上拖动鼠标，拉出一个控件图形。

７、右键单控件图形，选择属性，打开属性对话框。对控件属性进行设置。具体设置这里不做介绍，下面用代码对图形进行设置。

８、代码设置

下面代码添加到Form表单 UserForm_Initialize()过程里

With Me.WebBrowser1
    .Top = 10＇上边距
    .Left = 10＇左边距
    .Width = .Parent.Width＇控件宽度为Form窗体宽度
    .Height = .Parent.Height＇控件高度为Form窗体高度
    .Navigate "https://www.toutiao.com/c/user/50527634494/#mid=1554566493712386"
‘设置网站链接地址 Navigate “网址”
End With

９、效果展示

这个功能相对简单，可能在一些特定的需求下有用。

但是对于不同的浏览器，其一些动态过程应用并不理想，可能发生一些不要加载等问题。