1、首先在开发工具中打开VBA编辑器
2、在单元格区域当中输入一些内容作为例子
3、在VBA编辑器中插入模块
4、在模块当中输入如下代码,然后运行Private Sub UserForm_Init坡纠课柩ialize() '窗体初镫炜茛玳始化时执行With Me.WebBrowser1 '为网页设置上边距、左边距、高度和宽度 .Top=0 .Left=0 .Width=Me.Width-5 .Height=Me.Height-25 '用下一句调用网页地址,若是163新闻网则改用地址“http://163.com” .Navigate "http://post.baidu.com/f?ct=&tn=&rn=&pn=&lm=&sc=&kw= excel&rs2=0&myselectvalue=1&word=excel&tb=on" End With End Sub
5、[5] 在“附加控件”对话框中找到“Microsoft Web浏览器”,在前面复选框中打梆梯陶瘦叉并确定退出,如图13.63所示。此时工具箱中添加了一个Web控件,如图