Download einer Datei aus dem Internet

[singel]

Hallo Gemeinde


Bin echt am verzweifeln. Seit tagen versuche ich einen Makrolode zu finden, mit dem ich  von meiner Börsenseite eine Excel-Tabelle runterladen kann.
Nichts funktioniert bei mir. 

Nicht mal der Kode funktionier:

Code:

Private Declare PtrSafe Function URLDownloadToFile Lib "urlmon" _
    Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, _
    ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

Sub download_HK_picture()
imgsrc = "     <br/>[i]Dateiupload bitte im Forum! So geht es:<a href="thread-326.html"> Klick mich!</a>[/i]<br/>"
dlpath = "F:\Bilder\"
URLDownloadToFile 0, imgsrc, dlpath & "HK Skyline.jpg", 0, 0
End Sub

https://wellsr.com/vba/2018/excel/downlo...oadtofile/

Was mache ich falsch?

Windows 10, Excel 2016

[singel]

Wir dieser komische Inhalt bei "imgsrc=" entstenden ist ist mir unklar. Korrekt muss es dort heissen:
[code]imgscr = "
Dateiupload bitte im Forum! So geht es: Klick mich!
]

[schauan]

Hallöchen,

die Verlinkung bestimmter Seiten ist im Forum unterdrückt ...

[singel]

ach so...

es handelt sich hier um einen funktionierenden Link zu einem Pic bei Wiki.

[schauan]

Hallöchen,

das glaube ich Dir gerne, aber hier funktioniert der Link nicht ...
Vielleicht geht das auch mit PQ zu lösen?