Excel Macro ouverture lecture seule ou modif.

Bonjour,
je suis en train d'essayer de faire une macro pour ouvrir un fichier excel en modification seulement si l'user "cav1" est logé (voir bout de code). Le petit truc est que: quand quelqun l'ouvre (forcément en lecture seule) et que moi par la suite je veux l'ouvrire il est en lecture seule... Je suis obligé de le fermer une fois et de le réouvrire...

Est ce que quelqun a déjà eu ce genre de problèmes?

Et quand les personnes en lecture seule essaye de l'enregistrer il essaye de me créer un fichier temporaire, y a t il moyen d'empècher ca?

D'avance, un grand merci


Sub auto_open()

sChemin = ThisWorkbook.Path
sName = ThisWorkbook.Name
ok = sChemin & "\" & sName

If Environ$("USERNAME") = "cav1" Then
SetAttr ok, vbNormal

MsgBox "Lecture Modifications", vbInformation

Else

SetAttr ok, vbReadOnly

MsgBox "Lecture Seule", vbInformation

End If
End sub