Ошибка выполнения Excel VBA 1004 при сохранении файла

Question

Добрый день, я пытаюсь создать автоматическую c резервную копию при открытии листа Excel, однако возникает ошибка, говорящая о невозможности найти файл:

ссылка на изображение здесь (это на португальском языке, но в сообщении говорится: «Ошибка выполнения 1004: не удалось найти (sharepoint link.xlsm). Возможно ли, что он был перемещен, переименован или удален?»).

Следуйте коду:

Sub Autobackup()
'
' Autobackup Macro
'

'
    Dim path As String, name As String, data As String, ext As String
    path = "https://site.sharepoint.com/sites/Gestao/Documentos Compartilhados/General/BACKUP Banco de Dados/"
    name = " Banco de Dados de Contratos"
    data = Format(Date, "ww.yyyy")
    ext = ".xlsm"

     ActiveWorkbook.SaveCopyAs Filename:= _
        path & "Backup Semana " & data & name & ext

End Sub

Странно то, что эта ошибка возникает только тогда, когда я использую метод «SaveCopyAs». Когда я использую метод «Сохранить как», Excel может найти путь и сохранить файл:

ссылка на изображение здесь

Но я не хочу сохранять лист в другое место, просто сделайте его копию.

Обратите внимание, что приведенный ниже код в точности совпадает с приведенным выше, изменения касаются только методов объекта «ActiveWorkbook».

    Sub Autobackup()
    '
    ' Autobackup Macro
    '

    '
        Dim path As String, name As String, data As String, ext As String
        path = "https://site.sharepoint.com/sites/Gestao/Documentos Compartilhados/General/BACKUP Banco de Dados/"
        name = " Banco de Dados de Contratos"
        data = Format(Date, "ww.yyyy")
        ext = ".xlsm"

         ActiveWorkbook.SaveAs Filename:= _
            path & "Backup Semana " & data & name & ext

End Sub

То есть путь правильный, но Excel почему-то не может сохранить копию. Кто-нибудь знает, объясните мне, почему?