最近发布的Windows 10(包括新浏览器--Microsoft Edge)之后,任何人都只需知道如何通过Excel VBA打开Microsoft Edge浏览器。我试图搜索网站没有任何运气。从Internet Explorer切换到Microsoft Edge
这是当前基本的Excel VBA代码我用来打开IE浏览器:
Sub xyz()
Dim Browser As SHDocVw.InternetExplorer 'Microsoft Internet Controls
Dim HTMLdoc As MSHTML.HTMLDocument 'Microsoft HTML Object Library
Dim URL As String
URL = "http://www.bbc.co.uk/news"
Set Browser = New InternetExplorer
Browser.Silent = True
Browser.navigate URL
Browser.Visible = True
Do
Loop Until Browser.readyState = READYSTATE_COMPLETE
Set HTMLdoc = Browser.document
End Sub
这是一个非常简单的一件VBA编码打开BBC网站为例。
但是,打开Microsoft Edge的新代码是什么?
这不仅仅是开放,它将打开的页面的DOM作为一个脚本对象获取,是你想要做什么?如果你只是想打开一个URL,忘记它,你可以shellexecute'microsoft-edge:http:// acme.com' –
谢谢亚历克斯,我认为并且相信这只是Shell Execute for Microsoft Edge的替代解决方案。暂时的。但是,我对Shell执行编程知之甚少,请您举个例子吗?非常感谢和感谢。 – Charlie
http://stackoverflow.com/questions/31302304/will-microsoft-edge-support-com-automation-internetexplorer-object –