deplacement dans une feuille par double click

[satwaf]

Bonjour a tous,

j'aimerai savoir comment,

1 - est-il possible lorsque la feuille est verrouillée, de ne plus avoir de message d'erreur lorsque je double click sur une cellule qui est en dehors de la zone concernée

2- lorsque je fais un double click sur une cellule de la zone concernée, j'aimerai que la cellule active se deplace dans la premier colonne de la ligne selectionnée

je joins le fichier pour exemple

 

[Efgé]

Re : deplacement dans une feuille par double click

Bonjour satwaf,
Deux propositions:
Pour

est-il possible lorsque la feuille est verrouillée, de ne plus avoir de message d'erreur lorsque je double click sur une cellule qui est en dehors de la zone concernée

Il suffit de déprotéger toutes les cellules de la feuilles puis de ne protéger que les cellules de la zone.

Pour

lorsque je fais un double click sur une cellule de la zone concernée, j'aimerai que la cellule active se deplace dans la premier colonne de la ligne selectionnée

Remplace ta macro par

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, Range("$a$6:$L$25")) Is Nothing Then Exit Sub
ActiveSheet.Unprotect Password:="1"
Cancel = True
Cells(Target.Row, 1) = Target.Value
Target.Value = ""
ActiveSheet.Protect Password:="1"
End Sub

Cordialement

 

[satwaf]

Re : deplacement dans une feuille par double click

Merci efgé pour la premiere partie ca fonctionne impec, j'ai juste modifier un peu pour obtenir Cells(Target.Row, 1).Select

merci encore