Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1844to1848
1844to1848
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Excel Mappe im Sharepoint abspeichern

Forumthread: Excel Mappe im Sharepoint abspeichern

Excel Mappe im Sharepoint abspeichern
16.09.2021 10:39:57
Jan
Hallo,
ich würde gern eine Excel Mappe auf dem Sharepoint ablegen.
Mein Code bisher:

Sub SharePoint()
Dim SharePointPath As Variant
Dim FileAsNamed As Variant
SharePointPath = "https://collaboration.cc.ebs.corp/sites/02135/_layouts/15/start.aspx#/Reporting%20and%20Controlling/Forms/AllItems.aspx?RootFolder=%2Fsites%2F02135%2%20and%20%2F%20of%20Change%2FPower%20Bi%20Noc%2FAblage&FolderCTID=0x01200091367BCBED10DE4D8F8274E39DF7ABAA&View=%7BE6FDA241%2D4CDD%2D46C1%2DA01A%2D3FC7331BEB6A%7D"
FileAsNamed = SharePointPath & Year(Date) & "-" & Month(Date) & "-" & Day(Date) & "_" & ThisWorkbook.Name
' save the copy
ThisWorkbook.SaveAs FileName:=FileAsNamed, FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
End Sub
ich bekomme immer den Fehler Laufzeitfehler 1004
Vielen Dank !
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel Mappe im Sharepoint abspeichern
16.09.2021 22:54:55
Yal
Hallo Jan,
Probiere mal mit folgendes

Sub SharePoint()
Dim DateiName As String
Const SharePointPath = "https://collaboration.cc.ebs.corp/sites/02135/Reporting and Controlling/"
DateiName = SharePointPath & Year(Date) & "-" & Month(Date) & "-" & Day(Date) & "_" & ThisWorkbook.Name
ThisWorkbook.SaveAs Filename:=DateiName, FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
End Sub
Es könnte sein, dass es noch einen Unterverzeichnis nach "Reporting and Controlling" gab (".. and of change/Power BI Noc/Ablage" ...)
Einfach eingeben inkl. Leerzeichen.
Bei der gegebenen Pfad
?RootFolder=%2Fsites%2F02135%2%20and%20%2F%20of%20Change%2FPower%20Bi%20Noc%2FAblage
ist nach "02135" ein "%2%20". Das kann nicht sein: der erste %2 sollte "%"+zweistellig sein: %20 oder %2F oder andere, aber %xx nicht %x
VG
Yal
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige