Gestion concurrentielle - multi utilisateurs

Bonjour,

J'ai une base de donnée sous Excel car je n'ai pas accès à un serveur SQL malheureusement. Je dois donc, avant que vous me disiez que ce n'est pas optimal d'utiliser Excel comme BDD, vous dire que je n'ai malheureusement pas le choix :-( (pas d'Acess non plus).
En gros j'ai un Userform qui sera ouvert sur plusieurs pc qui lancera des requetes SQL à la base (lecture et écriture).
Pour commencer à faire la gestion concurrentielle, j'ai fais le bout de code suivant :

Sub test_connection()
    Dim wb_source As Workbook
    Dim wb_bdd As Workbook
    Dim link_bdd As String
    
    Dim objOFS As Variant
    Set objOFS = CreateObject("Scripting.FileSystemObject")

    Set wb_source = ThisWorkbook
    link_bdd = wb_source.Sheets(1).Range("B2").Value
   
    i = 1
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    
    Do While Not i = 11
        On Error Resume Next
        objOFS.MoveFile link_bdd & "\BDD.xlsx", link_bdd & "\BDD.xlsx"
        If Err = 70 Then
            Application.Wait (1000)
        Else
            Workbooks.Open (link_bdd & "\BDD.xlsx")
            Set wb_bdd = ActiveWorkbook
            Sheets(1).Range("A10000").End(xlUp).Offset(1, 0).Value = i & " procedure 1"
            i = i + 1
            wb_bdd.Close True
            Application.Wait (1000)
            'Exit Do
        End If
    Loop
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
End Sub

Je viens en gros regarder si je peux renommer la base avec le meme nom (pour éviter de la renommer). Si elle est ouverte, j'ai l'erreur 70 permission denied. j'attends donc avant de relancer la procédure do while. SI je peux renommer la base, je l'ouvre et inscris un numéro incrémental suivi de "procédure 1" puis je l'enregistre.
Le but étant que pour tester cette gestion, 2 utilisateurs pour commencer, lancent la macro1 et la macro 2 (meme macro mais avec procédure 2 écrit a coté du i, afin de voir quand les utilisateurs ont eu accès à la BDD. Si tout ce passe correctement on devrait avoir ca dans la BDD :

1 procédure1
1 procédure2
2 procédure1
3 procédure1
2 procédure 2
etc..
Ceci est assez aléatoire vu les delay appliqués. Mais le but étant de voir qui a écrit quoi et avant qui.

Voila seulement, ca fonctionne peu souvent, mais quand meme certaine fois. Le problème est qu'un message me demandant d'enregistrer la base car celle-si est ouverte ou introuvable. Cela veut dire que l'autre utilisateur avec la macro 2 a réussi a entrer dans la BDD alors que j'y étais déjà.

La macro 1 est lancé depuis le fichier1 et la macro 2 depuis le fichier1(copie) pour éviter la gestion de la lecture seule (dont je m'occuperai plus tard).

Avez-vous une idée de ce bug là dedans ?
Merci beaucoup pour vos avis d'experts ;-) mais j'ai rien trouvé sur la gestion concurrentiel sous excel malheureusement.

Bonne fin de journée

PS : Je ne pourrai que vous répondre demain matin