Bonsoir Michel, Pascal, Robert et Fabrice, ainsi que le Forum of course.
Assez brièvement, car je ne fais que passer vite fait sur le forum .
J'ai surtout noté que notre ami Fabrice à répondu à Robert qui conseillait très simplement (et très justement) d'utiliser les protections standards d'Excel, mais qu'il ne pouvait pas appliquer le "verrouillage d'XL", car il a des macros qui doivent utiliser des cellules qui sont verrouillées...
Et bien dans ce cas précis, je conseille de ne pas faire des "usines à gaz" avec les évènementielles qui ont été proposées mais, tout simplement, d'utiliser La Protection Combinée à UserInterfaceOnly qui est tout à fait prévue pour ceci...
Pour tous les détails je vous conseille à tous de lire :
Lien supprimé
qui se réfère aussi à :
Lien supprimé
On peut même combiner encore cette méthode à "EnableSelection" uniquement sur "xlUnlockedCells" et là les cellules seront vraiment insaisissables !!!
Je pense que ce sera bien plus simple (et plus fiable aussi) mais maintenant si on veut vraiment le faire par évènementielle, sans protection, alors moi je privilègerais l'évenement "Worksheet_SelectionChange" car l'évènement "Worksheet_Change" ne peut convenir puisque l'évènement est capté après le changement (donc trop tard !) voici ce que çà donnerait sans message stressant !!
Private Sub Worksheet_SelectionChange(ByVal target As Range)
If target.Address = "$A$1" Then
Range("A2").Activate
End If
End Sub
Mais la protection reste le plus simple à mes yeux
Bonne Soirée
@+Thierry