Limité le déplacement dans les cellules

[Alain]

Bonjour,

Comment puis-je limiter le déplacement dans une certaine plage par exemple dans la matrice A2 à C4

Bonne journée....... et merci d'avance

 

[Hervé]

bonjour

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.Intersect(Target, Range("a2:c4")) Is Nothing Then
Range("a2").Select
End If
End Sub

Ce code placé dans le module de la feuille désirée (clic droit sur l'onglet de la feuille, puis visualiser le code) interdit aux utilisateurs de sélectionner une cellule hors de la plage A2:c4 (ils sont renvoyées en A2).

Salut
Hervé

 

[lea]

Bonjour Alain,

Une proposition qui ne répondra pas exactement à ton problème mais qui, à défaut de limiter le déplacement hors de Range("A2:C4"), interdira toute écriture dans ces cellules externes au tableau : tu protèges les cellules externes contre l'écriture.
Maintenant s'il existe une solution à ta question je suis preneuse
Léa

 

[galopin01]

Bonjour,
Protéger la feuille + Décocher sélectionner les cellules verrouillées...
A+

 

[Alain]

Merci,

Résultat impéccable grace à la solution de Hervé

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.Intersect(Target, Range("a2:c4")) Is Nothing Then
Range("a2").Select
End If
End Sub

Ce code placé dans le module de la feuille désirée (clic droit sur l'onglet de la feuille, puis visualiser le code) interdit aux utilisateurs de sélectionner une cellule hors de la plage A2:c4 (ils sont renvoyées en A2).

Grand merci