|
Hallo,
ich habe eine kurze Frage zu der Funktionsweise von URLDownloadToFile und würde mich über Hilfe sehr freuen!
Ich möchte gerne ein Excel File von einer url downloaden und dieses dann in meinem destinationFile_local speichern. Dazu habe ich mir bereits einen Code geschrieben. Mein Problem ist, dass die Funktion URLDownloadToFile nicht erkannt wird: Compile error: Sub or Function not defined.
Da ich in VBA noch ziemlicher Anfänger bin, wäre ich über jede Hilfe dankbar, um das File von der Website zu downloaden. Ich bin auch sehr offen für andere Coding-Vorschläge, falls jemand einen effizienteren Weg kennt.
Herzlichen Dank im Voraus!
Tim
Sub download_file()
Dim downloadStatus As Variant
Dim url As String
Dim destinationFile_local As String
url = [https://www.ishares.com/de/privatanleger/de/produkte/251382/ishares-msci-world-minimum-volatility-ucits-etf/1478358465952.ajax?fileType=csv&fileName=IQQ0_holdings&dataType=fund]
destinationFile_local = "C:\Users\Me\Documents\..."
downloadStatus = URLDownloadToFile(0, url, destinationFile_local, 0, 0)
If downloadStatus = 0 Then
MsgBox ("Downloaded Successfully")
Else
MsgBox ("Download failed")
End If
End Sub
|