Microsoft 365 Comment empêcher l'ouverture en lecture seul?

[Claudy]

Bonjour à tous,
un fichier avec plusieurs utilisateurs, comment empêcher l'ouverture en lecture seule, et éviter des copies à l'enregistrement?
Cerise sur le gâteau, si le fichier est déjà ouvert un message qui signale qui utilise ce fichier.
Merci d'avance,
Claudy

 

[Compte Supprimé 979]

Bonsoir Claudy,

Voici le code à mettre dans ThisWorkbook

Private Sub Workbook_Open()
  If ThisWorkbook.ReadOnly Then
    MsgBox "Ce classeur est déjà ouvert par un autre utilisateur," _
    & "il va donc être fermé, merci de patienter !", vbExclamation, "LECTURE SEULE"
    ThisWorkbook.Saved = True
    ThisWorkbook.Close SaveChanges:=False
  End If
End Sub

@+

 

[Claudy]

Bonsoir Bruno, et grand merci
Mais comment avoir le nom de l'autre utilisateur?
Histoire de téléphoner ou mail à cette personne dans le genre: "Dégage de ce fichier je dois y encoder des trucs"...
Merci,
Claudy

 

[Compte Supprimé 979]

Re,
Excel te le dit à l'ouverture normalement.

En VBA à ma connaissance c'est impossible