如何使用VBA激活已打开的只读文件

Question

我正在使用脚本从受密码保护的URL打开CSV文件。然后我想激活这个CSV文件并获取内容并将其导入另一个文件

我的问题是我无法激活此文件，因为它已作为只读文件打开：

Sub Test()
    Call GoToWebSiteAndDownloadCSV 
    Windows("erp_dump_file.csv").Activate

    'then will come script to do the importing of the contents

End Sub

这是下载CSV文件的例程的脚本：

Sub GoToWebSiteAndDownloadCSV()
    Dim data As Workbook
    Dim appIE As Object    ' InternetExplorer
    Dim doc As Object    'HTMLDocument
    Dim URL As String
    Dim objIMG As Object    ' HTMLImg
    Dim objAnchor As Object    ' HTMLAnchorElement

    Set appIE = CreateObject("InternetExplorer.Application")

    URL = "https://ereplica.co.uk/page/erp-dump-file"

    With appIE
        .navigate URL
        .Visible = True

        Do While .busy: DoEvents: Loop
        Do While .ReadyState <> 4: DoEvents: Loop

        Set doc = .document

        doc.getElementById("password").Value = "simonerp"

        Set goBtn = doc.getElementById("joe_btn")
        goBtn.click

End With

    Set appIE = Nothing

End Sub

如果您尝试使用此代码，您会发现下载的文件不会随时激活，因此我无法使用Set X = ActiveWorkbook（其中X是工作簿类型）来引用它。还有什么，因为它是以只读方式打开的，Windows命令无法激活它。

我怎样才能尝试激活此文件？