我正在尝试自动化从网站下载文件的过程。目前我能够打开运行javascript的链接,生成输出文件,这是我的代码:
Sub WebDataExtraction()
Dim URL As String
Dim IeApp As Object
URL = "http://si3.bcentral.cl/Siete/secure/cuadros/DescargarExcel.aspx?DropDownListFrequency=&DrDwnCalculo=NONE&codCuadro=UF_IVP_DIARIO"
Set IeApp = CreateObject("InternetExplorer.Application")
IeApp.Navigate URL
End Sub
当我运行sub时,会弹出IE View Downloads窗口。要下载文件,我尝试关注this approach,但是当我使用附加代码时,我无法找到子窗口。
有人可以告诉我如何从这里开始吗?或者可能有任何建议如何以不同的方式解决这个问题?