Discussion :

[nattyman]

Bonjour
J'essaye d'accéder aux controles d'un formulaire, non pas avec leur noms, mais avec leurs numéros.
Mon formulaire a une dizaine de lignes à remplir les unes après les autres, et je veux (entre autres) activer chaque controle une fois que le précédent a été rempli (d'où l'utilité de les appeler par leurs numéros).

J'ai essayé ce genre de choses, sans succès

Code :

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

1
2
 
Controls.Item(19).enabled = true

ou

Code :

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

1
2
 
Controls.(19).enabled = true

19 étant juste un nombre, qui peut prendre n'importe qu'elle valeur en fait.
J'aimerais aussi récupérer le numero (ou index) de certains controles.
Voilà, si vous avez une idée, merci beaucoup!

Marco

[LedZeppII]

Bonsoir,

On peut écrire

Code :

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

Controls(index).Enabled ou Controls.Item(index).Enabled

Mais tous les contrôles n'ont pas la propriété Enabled.
De plus le numéro d'index d'un contrôle ne correspond pas toujours à l'ordre des contrôles sur le formulaire.

Je te conseillerai plutôt une logique par nom de contrôle.
Par exemple txtCtl01 à txtCtl10 (remplacer Ctl par un nom 'parlant') pour dix contrôles Texte.

Code :

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

1
2
3
4
5
6
7
8
Dim i as Integer
Dim srtCtlName as string

i = valeur entre 1 et 10
strCtlName = "txtCtl" & Format(i,"00")

Me.Controls(strCtlName).Enabled = True

Le numéro d'ordre de tabulation s'obtient avec

Code :

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

1
2
 
Controls(19).TabIndex

Bon courage

[Mahefasoa]

Salut,
En résumé de ce que LedZeppII a expliqué, la bonne écriture est:

Code :

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

Controls(19).Enabled = True