Avertir un user qui modifie une cellule qu'il est en read only

Bonjour,

Dans le cadre professionnel, je met à jour le code VBA d'un fichier vieux de plus de 15 ans.
J'ai donc modernisé et simplifié les anciennes fonctionnalités mises en place,
j'en ai rajouté d'autres,
en revanche, à l'époque il n'y avait qu'un seul utilisateur, maintenant il y'en a plus de 40...
Il a donc été mis en place des sécurités pour que seules 3 personnes puissent être en écriture sur le fichier (un mot de passe pour empêcher l'ouverture en écriture changeant régulièrement)

Néanmoins, il arrive que les comptables ayant accès au fichier en écriture se retrouve à consulter simultanément le fichier, donc l'un d'entre eux est en écriture et les autres également en lecture.
Il arrive également que ce fichier reste ouvert en lecture seule chez un agent ayant l'autorisation d'écrire dessus et que celui-ci par erreur modifie le document en pensant être en écriture... Et lors de l'enregistrement, boum, impossible puisque la personne est en lecture seule.

J'ai donc déjà rajouté cette petite macro au début de chaque autre macro

'macro pour le nouvel engagement

'avant d'activer une macro, vérifier que le fichier est accessible en écriture

If ActiveWorkbook.ReadOnly Then

'le classeur est en lecture seule, message d'alerte

MsgBox ("Attention, le classeur est ouvert en lecture seule, cette procédure va être interrompue.")

'ARRET DU TRAITEMENT

End

End If

'cas ou le classeur n'est pas en lecture seule

'ne pas mettre à jour l'affichage d'excel quand les macros tournent.

Application.ScreenUpdating = False

'Afficher toutes les données et suppression des filtres seulement s'il y'en a

'vérifier s'il y'a des filtres sur la feuille

If ActiveSheet.FilterMode Then

'si oui, les remettre en position neutre

ActiveSheet.ShowAllData

End If

Mais, si cette option me convient pour les actions directes des utilisateurs sur les macros, elle ne fonctionne bien sur pas quand un utilisateur souhaite modifier un libellé ou la valeur d'une case.
Il me semble qu'il est possible d'ajouter un petit quelque chose qui prévient ce désagrément directement dans le workbook mais je ne sais pas comment le tourner et les aides à ce sujet sont plutôt maigres (après il est aussi possible que j'ai mal formulé ma recherche)
Pouvez-vous m'aider ? Ou me renvoyer vers le topic idoine si cette demande a déjà été traitée ?
Il s'agit d'un fichier excel 2003