从Internet Explorer切换到Microsoft Edge

问题描述

最近发布的Windows 10，包括新的浏览器 - 微软Edge，任何人都会知道如何通过Excel VBA打开Microsoft Edge浏览器。我已经尝试搜索网站没有任何运气。

After the recent release of Windows 10, including the new browser - Microsoft Edge - would anyone simply know how to open Microsoft Edge browser via Excel VBA. I have tried searching the website without any luck.

这是目前基本的Excel VBA编码，我用来打开Internet Explorer：

This is the current basic Excel VBA coding I use to open the Internet Explorer:

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网站。

This is a very straight forward piece of VBA coding to open the BBC website for example.

但是，打开Microsoft Edge的新代码是什么？

However, what is the new piece of coding to open Microsoft Edge?

推荐答案

根据MS ，IE11附带Windows 10

According to MS here, IE11 ships with Windows 10

所以现在的IE代码应该继续工作。没有尝试过。

So existing code for IE should continue to work. Not tried it though.

可以找到Edge上的一些技术资料

Some technical stuff on Edge can be found here

截至2015年8月10日，我已升级一台电脑从Win 7 Pro SP1到Win 10 Pro和您提供的代码工作正常。 IE11运行正常并显示网站。 证实我已经安装了。

As of Mon 10-Aug-2015, I have upgraded one PC from Win 7 Pro SP1 to Win 10 Pro and the code you supplied works fine. IE11 runs fine and shows the website. The IE11 download page confirms that I've already got it installed.

这篇关于从Internet Explorer切换到Microsoft Edge的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！