Удаление файла Excel из папки sharepoint - PullRequest
Новая
       41

Удаление файла Excel из папки sharepoint

0 голосов
/ 06 апреля 2020

В настоящее время я пытаюсь удалить файл из папки sharepoint, которая сначала сохраняет файл в другой папке, а затем удаляет старый файл с тем же именем в другой папке. Это потому, что я не могу переместить файл из одной папки sharepoint в другую папку. Честно говоря, я понятия не имею, как удалить файл, поскольку знаю, что код должен быть в состоянии прочитать файл в папке, но не уверен, как он работает в sharepoint. Если вы можете помочь мне, то это будет очень полезно для меня. Вот мой код ниже: 

Private Sub Approve_Click()

Dim path As String
Dim FileName1 As String


    path = "https://xxxxxx/sites/CompositeDigitalizationTest/Freigegebene%20Dokumente/Released%20Order%20Form/"
    FileName1 = Range("$B$2").Text
    ActiveWorkbook.SaveAs Filename:=path & FileName1 & ".xlsm", _
                          FileFormat:=xlOpenXMLWorkbookMacroEnabled
    Application.DisplayAlerts = True
    ActiveWorkbook.Close

'Open the file on the SharePoint server
Workbooks.Open Filename:="https://xxxxxxxx/sites/CompositeDigitalizationTest/Freigegebene%20Dokumente/Order%20Form/", UpdateLinks:=xlUpdateLinksNever
If Workbooks("Filename1.xlsm").SharedWorkspace.Connected Then
'Delete the file on the SharePoint server
Workbooks("Filename1.xlsm").SharedWorkspace.RemoveDocument
End If
'Close the workbook
Workbooks("Filename1.xlsm").Close
Application.DisplayAlerts = True
Else
Application.DisplayAlerts = False
End Sub
...