Microsoft 365 bloquer utilisateur si un autre deja connecté au fichier excel sur one drive partagé

[nemanovish]

Bonjour,

J'explique ma situation j'ai construis un petit logiciel me permettant de gérer la traçabilité de mes produits ainsi que livraison, fabrication...
Tout fonctionne très bien mais aujourd'hui nous sommes 3 utilisateurs sur 3 pc différent à l'utiliser de puis un OneDrive partagé, hors nous avons des bon de livraisons a numéro qui se suivent donc impossible de faire des bons en même temps.

Ma question peut on bloquer momentanément un bouton si un utilisateur déjà présent ?
En espérant être assez clair merci de votre aide

 

[herve62]

j'ai construis un petit logiciel

Sous windows et de surcroit avec Excel ??? ici c'est forum Excel ...avec VBA en +

 

[Dudu2]

Bonjour,
Si ce "petit logiciel" est Excel tu peux à l'ouverture du classeur créer si absent puis ouvrir un petit fichier Texte dédié dans lequel tu mets le nom de l'utilisateur si tu le connais ou un simple flag "In use" et à la fermeture du classeur après édition tu retires l'information.
Comme ça tu sais si tu peux laisser l'utilisateur éditer le classeur ou bien le fermer en lui disant "Désolé, ton pote Dupont est en train de l'utiliser".

 

[Dudu2]

J'ai retrouvé ça dans mon backlog... A tester !

Sub PartageClasseurÉcriture()
    Dim WB As Workbook
    Dim WB_Name As String
    
    WB_Name = "H:\Téléchargements\SUIVI INSTRUCTEURS - ACCUEIL - ATELIER.xlsm"
    If Not IsWorkBookOpen(WB_Name) Then
        Set WB = Workbooks.Open(WB_Name)
    Else
        MsgBox WB_Name & " déjà ouvert !"
    End If
    
End Sub

Function IsWorkBookOpen(FileName As String) As Boolean
    Dim ff As Long
    Dim ErrNo As Long

    On Error Resume Next
    ff = FreeFile()
    Open FileName For Input Lock Read As #ff
    ErrNo = Err
    Close ff
    On Error GoTo 0

    Select Case ErrNo
        Case 0:    IsWorkBookOpen = False
        Case 70:   IsWorkBookOpen = True
        Case Else: Error ErrNo
    End Select
End Function

 

[nemanovish]

Bonjour
Oui c'est un fichier excel avec du VBA et je suis sous windows.
Merci dudu pour ta réponse je vais essayer et je reviens vous dire.