[VBA-E]Utilisation de la tabulation sous excel

Version imprimable

27/01/2006, 11h33
philvba

[VBA-E]Utilisation de la tabulation sous excel

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!!
27/01/2006, 11h44
bouley

Bonjour philvba,

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

@+
27/01/2006, 11h57
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?
27/01/2006, 12h12
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

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

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

27/01/2006, 12h19
ThierryAIM

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

Avec TextBox sur une feuille

Code:

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 ?
@+

27/01/2006, 12h27
Megaxel

Houps!!
Ok, j'ai lu de travers... (Si, ça existe...)
Bon, désolé, je :arrow:
:D
27/01/2006, 14h06
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 )
27/01/2006, 20h28
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.
28/01/2006, 10h09
ouskel'n'or

Citation:

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+
07/02/2006, 17h30
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 ;)