DEPLACEMENT AVEC TABULATION

bennisay

XLDnaute Occasionnel

• 24 Septembre 2016

• #16

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

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 24 Septembre 2016

• #17

Re

Cel va mieux ?

 

Pièces jointes

• GOOD BUSINESS 2016 Edition N° 4 TESTE.xlsm

  194.2 KB · Affichages: 46

Vote positif 0 Vote négatif

bennisay

XLDnaute Occasionnel

• 26 Septembre 2016

• #18

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

 

Vote positif 0 Vote négatif

bennisay

XLDnaute Occasionnel

• 26 Septembre 2016

• #19

REB
j ai tout essaye mais ca marche ps

 

Vote positif 0 Vote négatif

bennisay

XLDnaute Occasionnel

• 26 Septembre 2016

• #20

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"

 

Vote positif 0 Vote négatif