Vba 从Chrome切换到Microsoft Edge浏览器

因为我现在的脚本是在chrome上打开的，我需要在微软的Edge上打开它，我在谷歌上试了试运气，但没有成功

Sub CoverPageDatabase()

  Dim chromePath As String

  chromePath = """C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"""

  Shell (chromePath & " -url http://www.stackoverflow.com/")

End Sub

---

请帮我找到解决方案

这就是您正在尝试的吗

Option Explicit

Sub CoverPageDatabase()
    Dim EdgePath As String
    Dim sUrl As String
    
    EdgePath = "C:\Windows\explorer.exe ""microsoft-edge:"""
    sUrl = "http://www.stackoverflow.com"
    
    Shell (EdgePath & sUrl)
End Sub