Excel vba使用现有打开的网站，而不是打开新浏览器访问网站，

可能重复：

---

我有一个每天更新的网站。我需要每天从这个网站检索信息。与其每天打开新的浏览器（如新的internet explorer），不如使用已打开的internet explorer检索信息

我没有安装IE，所以我不能保证它会工作，但是试试看。请注意，您需要设置对Microsoft Internet控件和Microsoft HTML对象库的引用

Function GetOpenIE() As SHDocVw.InternetExplorer

    Dim ie As SHDocVw.InternetExplorer
    Dim sw As SHDocVw.shellWindows

    Set sw = New SHDocVw.shellWindows

    For Each ie In sw
        If TypeOf ie.Document Is HTMLDocument Then
            Set GetOpenIE = ie
            Exit Function
        End If
    Next ie

End Function

---

为什么要发布一些你无法测试的东西（可能应该引用到其他地方的源代码）？另外，根据我上面的评论，这是一个重复的问题。