Excel VBA coding - Switching from Internet Explorer to 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.

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

Sub xyz()Dim Browser As SHDocVw.InternetExplorer 'Microsoft Internet ControlsDim HTMLdoc As MSHTML.HTMLDocument 'Microsoft HTML Object LibraryDim URL AsString

  URL ="http://www.bbc.co.uk/news"Set Browser =New InternetExplorer
    Browser.Silent =True
    Browser.navigate URL
    Browser.Visible =TrueDoLoopUntil Browser.readyState = READYSTATE_COMPLETESet HTMLdoc = Browser.documentEndSub

This is a very straight forward piece of VBA coding to open the BBC website for example.  However, the question is what are the new piece of coding to open Microsoft Edge? Any help would be much appreciated.