Загрузите URL с веб-сайта с макросом VBA, но он не имеет расширения

Question

Снимок экрана браузера

Я пытался найти решение, но подходил с пустыми руками ... вероятно, из-за моей собственной неопытности. Я пытаюсь автоматизировать процедуру из Excel, которая идет на веб-сайт (требует мое имя пользователя и пароль), загружает файл экспорта в Excel (обычно рядом с таблицей, на которой написано «Экспорт в Excel»), и сохраняет этоэлектронная таблица к месту на моем диске C :. Проблема, с которой я сталкиваюсь, заключается в том, что я вижу URL-адрес, если навести курсор на кнопку «Экспорт в Excel», но он не заканчивается на .CSV или .XLS. Ссылка - websitename.com/name/#, а не websitename.com/name.csv. Можно ли найти URL-адрес файла экспорта в Excel, чтобы использовать его в переменной myURL из приведенного ниже кода?

Дайте мне знать, если скриншоты или что-то еще здесь полезно. Спасибо

Sub DownloadFile()

Dim myURL As String
myURL = "Insert URL with file extension"

Dim WinHttpReq As Object
Set WinHttpReq = CreateObject("Microsoft.XMLHTTP")
WinHttpReq.Open "GET", myURL, False, "MyUserName", "MyPassword"
WinHttpReq.send

Dim oStream As Variant
If WinHttpReq.Status = 200 Then
    Set oStream = CreateObject("ADODB.Stream")
    oStream.Open
    oStream.Type = 1
    oStream.Write WinHttpReq.responseBody
    oStream.SaveToFile "C:\Users\Me\File.csv", 2 ' 1 = no overwrite, 2 = overwrite
    oStream.Close
End If

End Sub