VBA从网站中提取excel表

Question

我是VBA的新手，我正在尝试从我公司提供的网站中提取数据。我已经设法组装了一个代码来执行网站上的点击，但是我最后一步点击了应该从服务器打开包含我想要的数据的Excel工作表的链接。以下是我的代码：

Sub testing()

    Set objIE = CreateObject("InternetExplorer.Application")
    WebSite = "long URL provided by the company"
    With objIE
        .Visible = True
        .Navigate WebSite
        Do While .Busy Or .readyState <> 4
            DoEvents
        Loop

        Set unElement = .Document.getElementsByName("username")
        unElement.Item(0).Value = "my username"
        Set pwElement = .Document.getElementsByName("password")
        pwElement.Item(0).Value = "my password"
        .Document.forms(0).submit
        '.quit

        Do While .Busy Or .readyState <> 4
            DoEvents
        Loop

        Set expElement = .Document.getElementsByClassName("nav__action dropdown-trigger js--tooltip")
        expElement(0).Click

        Do While .Busy Or .readyState <> 4
            DoEvents
        Loop

        Set excElement1 = .Document.getElementById("obb_EXPORT_EXCEL")
        Set excElement = excElement1
        excElement(0).Click

    End With

End Sub

我在行excElement(0).Click处收到调试错误，自动化错误为80020101，当我突出显示带错误的突出显示行时，它显示公司提供的长URL。