fichier ouvre avec formulaire "Userform" mais n'indique pas s'il est déjà ouvert

[sirbeetee]

j'ai ce ficher qui est utilisé depuis 2 ans et il se comporte très bien

mais maintenant je dois donner accès à ce fichier à 200 usagés. je viens de me rendre compte que si je l'ouvre alors qu'il est déjà ouvert, j'aurai un message de lecture seul seulement quand je vais tenter un enregistrement, et non à l'ouverture, alors que je viens d'y inscrire 125 lignes de data !

ce fichier n'est pas partagé pourtant

 

[Dranreb]

Bonsoir.
C'est sûr à votre place j'ajouterais cette sécurité :

Private Sub Workbook_Open()
If Me.ReadOnly Then MsgBox "Déjà ouvert ailleurs…", vbExclamation, "Ouverture " & Me.Name: Exit Sub
UF_saisie_audit.Show
End Sub

 

[sirbeetee]

excellent merci !

je viens de trouver mon problème !

les autres utilisateurs n'ont pas eu les bons accès, ils sont en lecture seul donc le fichier ouvre même sans le message d'origine "lecture seul"

je garde ton code, il me sera pratique, merci encore