DEPLACEMENT AVEC TABULATION

[bennisay]

bonjour LE FORUM

j ai une question . comment combiner deux codes VBA pour faire ca

Si Je suis sur la cellule "b1" je veux me deplacer sur la cellule "a3" avec tabulation


Et si je suis sur la cellule "b5" je veux me deplacer sur la cellule "a6" avec tabulation
Et si je suis sur la cellule "b6" je veux me deplacer sur la cellule "a7" avec tabulation

ma feuille est nomé " MOUVEMENT"
Merci pour votre aide

 

[bennisay]

REB
en mettant une valeur sur les cellules soit "H4" ou "H7" le code fonctionne mais la celection ne reste ps sur la cellule "C7"
la celection se deplace

 

[pierrejean]

Re

Cel va mieux ?

 

[bennisay]

BONJOUR pierrejean
tjrs pareille j ai ps le cursseur sur "C7" je crois a cause de la presence du liste deroulante

 

[bennisay]

REB
j ai tout essaye mais ca marche ps

 

[bennisay]

reb

[/code]Private Sub Worksheet_SelectionChange(ByVal target As Range)
If Not Intersect([H7:H35], target) Is Nothing Then
Application.OnKey Key:="~", procedure:="retour_colonneC"
End If[/code]

c est le code qui fonctionne mais uniquement pour la colonne "H5:H35"

j ai mis dans un module
[/code]Sub retour_colonneC()
ActiveCell.Offset(1, -5).Select
Application.OnKey Key:="~"
End Sub[/code]


mais j ai ps de code pour combiner ce code avec le code qui fonctione pour "CH4" vers "C7"