Bonsoir patrick
Perso, j'ai fait cela dans une feuille pour protéger mes formules. si l'utilisateur se positionne dans une de ces cellules je fais un offset immédiat pour qu'il ne puisse rien toucher
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Range("H3:H25,F26:H26,I26"), Target) Is Nothing Then
Target.Offset(0, 3).Select
End If
End Sub
Les cellules protégées : "H3:H25,F26:H26,I26"
Cela peut peut-être s'adapter à ton cas..
Bonne soirée