Discussion :

[danieltur]

Bonsoir à tous.

Très modeste développeur débutant, je rencontre le problème suivant :

Pour faire simple, je crée différents contrôle dans une UserForm. Il y a des checkbox, textbox, combobox et listbox.

tout fonctionne, sauf pour ce qui est des listbox.

mon code est le suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Dim lecontrol As Control
 
Set lecontrol = userform1.controls.Add("forms.listbox.1", 1)
 
With lecontrol
.Top = dtopbx
.Left = leftoffset
.Name = "field" & huf - 1
.Width = dwidth
.SetFocus
End With

Résultat : dans la Userform apparaît uniquement la liste des items de la liste, ouverte si je puis dire, avec à la fois une barre de défilement horizontale et une barre de déf. verticale, mais je ne vois pas la zone de saisie (la textbox) avec la petite flèche à droite.
Autrement dit, je ne puis pas sélectionner quelque item dans la liste.

ce qui est étrange, c'est que si je modifie mon code en remplaçant controls.add("forms.listbox.1", 1) par controls.add("forms.combobox.1", 1), ça marche parfaitement : je crée bien une combobox, affichée et fonctionnant comme il se devrait.

mais c'est une listbox dont j'ai besoin…

D'avance je vous remercie de votre temps et de vos suggestions.

vous souhaitant le meilleur,
DanielTur

[patricktoulon]

re
rien capté!!!
une listebox n'a pas ce qu'une combobox a c'est a dire un textebox en haut pour saisie et le boutton pour dropper ???????????

[danieltur]

En pièce jointe : ce que j'obtiens.

pas moyen de sélectionner un item, pas de zone de texte où une sélection apparaît normalement.

qu'est-ce qui ne va pas dans mon code ?

[sogedic]

pour sélectionner, il suffit de cliquer dessus, non ?
Tu peux vérifier que l'on peut aller sur la liste

Code :

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

enabled=true

[danieltur]

Bonjour Sogedic,

Je te remercie de ta prompte réponse.

eh non, je ne peux rien sélectionner. Rien ne se passe si je clique ou double-clique sur l'un ou l'autre des items des listbox. Listes qui apparaissent en permanence comme le montra l'image que j'ai envoyée.

j'ai essayé de forcer le mode enabled comme tu le suggérais, sans résultat.

c'est à n'y rien comprendre. Toutes mes combobox fonctionnent sans problème avec le même type de code….

merci de ton temps.
Daniel

[sogedic]

Tu peux nous donner ton fichier ?