Discussion :

[philvba]

Bonjour à tous,

Je programme actuellement un outil sous excel dans lequel j'ai intégré plusieurs textbox et combobox (le tout dans une feuille excel et pas dans un formulaire).
Je me demandais si quelqu'un savait comment passer d'un controle à l'autre en appuyant sur "tab", parceque dans mon cas, rien ne se passe (apparemment la touche "tab" ne permet que le passage d'une cellule à l'autre)
Je connais la propriété "tab index" sous VB qui permet de definir l'ordre de passage d'un champ a l'autre mais cette propriété ne semble pas exister pour les champs intégrés aux feuilles excel.

Quelqu'un a-t-il une idée pour m'aider? Faut-il utiliser un moyen détourné ou est-ce tout simplement impossible?

J'aurais bien fait passer toute la feuille en formulaire mais j'ai malheureusement pas le temps...

Merci à tous!!

[bouley]

Bonjour philvba,

Regarde la propriété TabStop il faut qu'elle soit sur TRUE

@+

[philvba]

Merci mais malheureusement cettte propriété n'existe pas pour les controles placés sur une feuille excel (enfin en tout cas elle n'apparait pas dans la fenetre propriété de ces derniers).

Existe il un moyen d'avoir accès a ce genre de propriété, sans faire tout passer sur un formulaire VB?

[Igloobel]

On m'a donné la solution il y a peu de temps sur ce forum

c'est ONKEY qui te permet de controler la touche tab (fais F1 et regarde)

Igloobel

[Megaxel]

Je n'avais jamais essayé de faire ça, mais j'ai fait un test:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub test()
    UserForm1.TextBox1.TabIndex = 1
    UserForm1.TextBox2.TabIndex = 0
    UserForm1.TextBox3.TabIndex = 2
    UserForm1.Show
 
End Sub

Et ça marche bien: avec les tabulations, l'ordres des textboxes est 2-1-3

[ThierryAIM]

Megaxel >> Sur une Userform, oui, mais pas sur une feuille excel

[bouley]

Avec TextBox sur une feuille

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 9 Then ' touche TAB
    TextBox2.Activate
End If
End Sub

Cela te convient-il ?
@+

[Megaxel]

Houps!!
Ok, j'ai lu de travers... (Si, ça existe...)
Bon, désolé, je

[philvba]

merci pour votre aide.
J'essayerai avec la propriété onkey quand j'aurais le temps, mais je vais passer tous mes champs en controle d'abord, ca m'entrainera!
Quelqu'un sait comment ca marche? Il y a deja des topics la dessus j'imagine alors je vais chercher un peu, mais j'avoue que si vous savez, ca me fera gagner du temps et vous aurez mon éternelle gratitude (enfin éternelle faut voir! :p )

[zazaraignée]

Salut

Au collège on a Excel 2003 et pour les textBox et il n'y a pas de propriété TabIndex pour les contrôles (boîte d'outils Contrôles) placés sur une feuille de calcul (Worksheet). Faudra coder a mano. L'exemple de code fourni par bouley est tout à fait bien pour ce que tu cherches à faire.

[ouskel'n'or]

J'essayerai avec la propriété onkey quand j'aurais le temps, mais je vais passer tous mes champs en controle d'abord, ca m'entrainera!

Avant de faire ça, essaie le code de bouley, tu le places dans la feuille de code de la feuille de calcul, (deux clics sur le contrôle en mode création) pas dans un module.
Juste parce que j'ignore si tu avais compris et que ça ne t'avait pas été précisé...

A+

[philvba]

Excellent!! Le code de bouley marche impec! ca va un peu alourdir le code vu le nombre de controle mais le resultat est là!! merci a tous et particulierement a bouley