Bonsoir Samaos34,
Pour cela tu peux utiliser les codes ci-dessous qui vérifie à l'ouverture du classeur si une cellule est vide ou non.
Si elle n'est pas vide un message d'alerte surviendra. Et d'autre part à la fermeture du classeur rend cette même cellule vide.
Il faut placer le code dans l'objet ThisWorkbook. Faire ALT F11 pour ouvrir l'éditeur VBA. Puis ensuite Ctrl R.
Clic droit sur ThisWorkbook
Exemple fait sur la cellule AZ1. Mais choisir n'importe quelle case hors du cadre d'utilisation habituel du fichier.
Private Sub Workbook_Open()
if Range("AZ1") = "" then
Range("AZ1") = Application.Username
Else: Rep=MsgBox("Fichier déjà utilisé", vbCritical, "Attention " & Application.Username)
Private Sub Workbook_BeforeClose(Cancel as Boolean)
if Application.Username = Range("AZ1") then Range("AZ1")=""
End Sub
En l'absence d'autres indications le fichier est toujours accessible au deux utilisateurs.
Bonne continuation.