Excel VBA как автосохранить для отдельных пользователей

Question

У нас работают три разных пользователя, которые могут обновить один документ Excel с помощью Dropbox.Когда кто-либо из этих пользователей нажимает «сохранить», я бы хотел, чтобы документ сохранился в общей папке Dropbox.У каждого пользователя есть свой каталог, хотя на его компьютере и есть эта папка.

Вот мой код, который пока просто пытается сохранить копию в каталоге пользователя 1 - и если он получает ошибку 1004, онпробует каталог user2 и т. д.

Кажется, это работает, но я все еще получаю msgbox в конце.Как мне разбить эти операторы If, чтобы они перестали работать после того, как удалось сохранить копию?

Sub Auto_Save()
Option Explicit

    Private Sub Workbook_AfterSave(ByVal Success As Boolean)
    Dim backupfolder As String

    On Error Resume Next

    user1 = "C:\Users\user1.si\Dropbox\Hub\"
    user2 = "C:\Users\user2\Dropbox\Hub Admin Folder\"
    user3 = "C:\Users\user3.si\Dropbox\Hub\"

    ThisWorkbook.SaveCopyAs Filename:=user1 & ThisWorkbook.Name

    If Err.Number = 1004 Then
        ThisWorkbook.SaveCopyAs Filename:=user2 & ThisWorkbook.Name
        If Err.Number = 1004 Then
            ThisWorkbook.SaveCopyAs Filename:=user3 & ThisWorkbook.Name
            If Err.Number = 1004 Then
                MsgBox "Could not save copy to your directory."
            End If
        End If
    End If
End Sub