besoin d aide concernant les cellules(resolu)

[scal]

bonjour,

je voudrais tous simplement passer de la cellule A1 a la cellule C1 et revenir a la cellule A2 puis C2 ect......

je joint un fichier pour plus d explication et moin de charabia

merci d avance pour votre aide

 

[kjin]

Re : besoin d aide concernant les cellules

bonsoir,

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row < 4 Or Target.Count > 1 Then Exit Sub
If Target.Column = 2 Then Target.Offset(0, 5).Select
If Target.Column = 7 Then Target.Offset(1, -5).Select
End Sub

A+
kjin

 

[Modeste]

Re : besoin d aide concernant les cellules

Bonjour scal
Salut kjin

Une autre solution (mais peut-être que j'enfonce une porte ouverte!?):

• sélectionner les cellules où l'encodage doit pouvoir se faire, en colonnes B et G
• format de cellule > onglet Protection > décocher "Verrouillée"
• protéger la feuille (onglet Révision) en décochant "Sélectionner les cellules verrouillées"
• les touches Tabulation ou Enter permettent dès lors de parcourir les cellules dé-verrouillées

 

[scal]

Re : besoin d aide concernant les cellules

bonjour a vous 2

merci d avoir repondu a ma demande
j ai bien pris vos propositions en compte et je les testerais demain au taf
je vous tiens au courant.....

a+

 

[scal]

Re : besoin d aide concernant les cellules

bonsoir,

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row < 4 Or Target.Count > 1 Then Exit Sub
If Target.Column = 2 Then Target.Offset(0, 5).Select
If Target.Column = 7 Then Target.Offset(1, -5).Select
End Sub

A+
kjin

kjin ,j avais oublié comment je fais pour mettre ton code dans mon tableau

merci

 

[scal]

Re : besoin d aide concernant les cellules

Bonsoir

Avec un peu de retard,je reviens vers vous pour vous dire que tous est OK.

merci

 

[scal]

Re : besoin d aide concernant les cellules

bonsoir

voila mon claseur a un peu evoluer par rapport a l ancien et tous est OK grace a vous.
mais il y a un mais comment mette en surbrillance la ligne d erreur apres avoir repondu au message
pour une meilleur visibilité.

merci