HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Entdecke rund 2 Millionen Excel-Lösungen im
Forumsarchiv
Forumbeitrag
Excel-Version des Fragestellers:
365 Business
Erfahrungslevel des Fragestellers:
Excel-Profi - VBA gut
Marc
14.06.2026 19:35:54
AW: Crossposting
z.B.

hier muss aber der Zugriff/Auth auf Sharepoint schon über die Windows/Benutzer Anmeldung (z.B. Auch Citrix) erfolgt sien..




Sub DownloadFile()
Dim url As String, target As String
Dim http As Object, stream As Object

url = "https://tenant.sharepoint.com/sites/DeineSite/Freigegebene%20Dokumente/Test.xlsx"
target = "C:\Temp\Test.xlsx"

Set http = CreateObject("MSXML2.XMLHTTP")
http.Open "GET", url, False
http.Send

If http.Status = 200 Then
Set stream = CreateObject("ADODB.Stream")
stream.Type = 1 'binary
stream.Open
stream.Write http.responseBody
stream.SaveToFile target, 2 'overwrite
stream.Close
Else
MsgBox "Fehler: HTTP " & http.Status & vbCrLf & http.responseText
End If
End Sub




Für modernes SharePoint Online ist der stabilere Weg über Microsoft Graph
Als Antwort auf diesen Beitrag
Oberschlumpf
13.06.2026 18:45:33
AW: Crossposting
Hi Marc,

wenns so einfach is, dann zeig doch auch ma ne Lösung mit HTTP/HTTPS-Zugriff auf die zu runterladenden Date(eie)n, und nich mit lokalem Zugriff a la C:\Ordner\Datei

Ciao
Thorsten
Folgenachrichten
Antwort auf Beitrag erstellen
Bitte einen Anwendernamen ohne @ eingeben.
Bitte das Passwort eingeben.
Bitte eine gültige E-Mail-Adresse eingeben.
Bitte einen Betreff eingeben.
Weitere Optionen
Aktivieren, wenn die Frage/der Beitrag noch nicht beantwortet wurde und unter Listen > Offene Threads erscheinen soll.
Beispieldatei hochladen

Bitte einen Nachrichtentext eingeben.