Excel Mappe im Sharepoint abspeichern
16.09.2021 10:39:57
Jan
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
Vielen Dank !