VBA для перемещения файла из одной папки Sharepoint в другую в Excel

Question

Я хочу написать (или найти) некоторый код VBA, который в основном перемещает лист XL из одной папки Sharepoint в другую папку Sharepoint, когда кто-то нажимает кнопку макроса.

Единственное решение, которое я нашел до сих пор является то, что мне нужно сопоставить ссылку Sharepoint в локальную папку, а затем использовать код .FSO, но это не работает для меня, так как нет доступа администратора, чтобы сделать это по соображениям безопасности.

Единственный код, который я обнаруженный до сих пор ниже

Function ConvertPath(path) As String
  ConvertPath = Replace(path, " ", "%20")
  ConvertPath = Replace(ConvertPath, "/", "\")
  ConvertPath = Replace(ConvertPath, "http:", "")
End Function
Private Sub Approve_Click()
  Dim sDocPath As String
  Dim sDocPathConv As String
  Dim sFileName As String
  Dim sTargetPath As String
  Dim sSourcePath As String
  Dim fso As FileSystemObject
  Set fso = New FileSystemObject ' CreateObject("Scripting.FileSystemObject")
  sDocPath = ThisWorkbook.path
  sFileName = "WorkBook.xlsx"

  sDocPathConv = ConvertPath(sDocPath)

  sSourcePath = sDocPathConv & "https://xxxx.sharepoint.com/sites/xxxxxx/" & sFileName
  Debug.Print "Source: " & sSourcePath     
  sTargetPath = sDocPathConv & "https://xxxx.sharepoint.com/sites/xxxxxxx/" & sFileName
  Debug.Print "Target: " & sTargetPath
  fso.CopyFile sSourcePath, sTargetPath, True
End Sub

И даже этот код не работает, поскольку он всегда выдает ошибку, которая говорит: «Путь не найден». Я совсем не знаком с программированием на VBA.