我尝试将网页嵌入到.xlsm Excel2010文件中。到目前为止,我所做的是:
在Sheet1中,我插入了名为“Microsoft Web Browser”的ActiveX控件,它的默认名称是WebBrowser1 (开发人员->插入->更多控件->Microsoft Web Browser)。然后使用VBA编辑器,我将以下代码放入工作表模块Sheet1中:
Private Sub Worksheet_Activate()
WebBrowser1.Navigate "http://stackoverflow.com/"
End Sub
我试过放在本地硬盘上的各种网站和html文件,但WebBrowser1控件中显示的内容总是一样的--“Internet Explorer Cannot Display the Webpage”错误,没有任何来自Excel VBA的错误。Microsoft Web浏览器对象似乎无法建立到网页的连接。
发布于 2015-02-11 01:13:04
试试这个:
'declare the web browser object for future reference and / or for listening to its events
Dim WithEvents ie As WebBrowser
'navigate when the worksheet is activated.
Private Sub Worksheet_Activate()
Set ie = ActiveSheet.WebBrowser1
ie.Navigate2 "http://stackoverflow.com/"
End Sub
发布于 2016-04-19 21:06:04
在导航之后,你必须加上括号,也许这就是为什么它不能阅读网站的原因。它应该是这样的
WebBrowser1.Navigate("http://www.stackoverflow.com")
https://stackoverflow.com/questions/28042791
复制相似问题