Bonjour,
C'est ma première intervention et espère avoir respecté les règles.
Mon problème est le suivant:
j'ai une feuille sur laquelle il y a des cases à cocher, des listes déroulantes et des champs à remplir.
Je voudrais "simplement" me déplacer avec la touche tab dans un ordre que je veux définir.
La 1ère cellule est AI3, je veux ensuite aller en AI4 jusqu'à AI7 puis aller et H4 ... ensuite laisser libre le choix des autres cellules.
J'ai trouvé ceci, mais ça ne fonctionne pas, il manque surement quelque chose!
sur le module feuille
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Private sub Worksheet_Activate()
Application.OnKey"{TAB}","touche_Tab"
End sub
sur module standard
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Sub touche_Tab()
Select Case ActiveCell.Address(0,0)
Case "AI3":Application.GoTo Range("AI4")
....
Case "X10":Application.GoTo Range("X11")
End Select
End sub
Merci de m'aider, en pj le fichier