Gérer les Objets VBA par une Variable

Bonjour,

J'ai une petite question, j'essaie d'afficher / Masqer des Zones de Texte selon la sélection dans une liste à choix multiples.
Lorsque la ligne 1 est Sélectionnée, je veux fair apparaitre le Texte 1 et comme ça sur 20 Zones de Texte.

Une boucle For - Nexte me permet de tester chaque lignes de ma liste et c'est là que je bloque.
Comment me servir de ce N° pour afficher / masquer la Zone correspondante ?

Un exemple de ce que je voudrais :
Public Sub List_Change()
For i = 0 to 20
If me.List.selected(i) = True Then
List & i.Visible = True
Else
List & i.Visible = False
End If
Next
End Sub

Merci d'avance

Bonjour,
qu'est List0 (par exemple) (quel type de contrôle est-ce ?)
S'il s'agit d'une textbox ===>>
Controls("list" & i) se réfère à la textbox nommée list0 si i = 0, list1 si x = 1, etc ...

PS : tu gagnerais probablement beaucoup à utiliser plutôt un groupe de textbox indexées en ce qui concerne ces textboxes

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

Salut

Pas d'indexation possible, c'est du VBA, comme ne le précise pas la catégorie de la question --> Catégorie modifiée

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés
Le savoir est la seule matière qui s'accroit quand on le partage (Socrate)

Une liste à choix multiple est-elle une Listbox pour toi ?


MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI

Ah ! du VBA !
Il manque alors maintenant une précision d'importance : sur quoi sont mes ces contrôles !
Car la réponse est différente dans un cas ou dans l'autre !
Conclusion : on en est au 5ème message par légèreté de l'exposé de la difficulté.

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

Re,

Tout d'abord merci pour votre attention.
Ensuite je croyais avoir mis ce post au bon endroit, autant pour moi

Donc en ce qui concerne mon pb,
Oui je suis sur VBA Excel (2003)

Mon contrôle est réalisé par une ListBox appelée dans l'exemple List
La List est à choix multiples : MultiSelect à 1

Les Zones à Afficher / Masquer sont de simple Textbox appelées List1 à List20, chacune liée à une ligne de List

Que dire de plus ?
Je veux afficher List1 lorsque la première ligne de List est sélectionnée et Masquer List1 dans le cas contraire

Heu,

Comme j'ai 20 TextBox à gérer, je n'ai pas envie de tester chaque ligne séparément, une boucle serait plus propre.

D'où ma question

Selon ce que tu dis, tu veux afficher List1 seulement si la 1ere ligne de List est sélectionnée, donc



On pourrait simplifier, mais c'est plus compréhensible de cette façon...

MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI

C'est la version pas à pas effectivement.
Mais j'ai 20 fois ce code à entrer, en plus d'autres tris sur ces états (en pyramide)
Le but est donc de créer une boucle en passant en revu les 20 TextBox à la chaîne, selon les Sélection de List
La Variable obtenue pouvant alors être réutilisée tout le long du code

Code Visual Basic :
Public Sub List_Change()
For i = 0 to 19
If me.List.selected(i) = True Then
List & i.Visible = True
Else
List & i.Visible = False
End If
Next
End Sub

En rouge les mentions que je voudrais piloter par variable.

Alors, comme le suggérait ucfoutu, tu peux utiliser Controls

Disons que tes textbox se nomment Textbox1, Textbox2, Textbox3,... et sont dans le même ordre que les lignes de ta liste, tu pourrais tout mettre ça dans une boucle du genre



Je mets -1 parce que les Index d'une Listbox commencent à 0 et tes contrôles commenceraient à 1...

MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI