Activer une listbox

dran_200 · 18 Août 2010

Bonjour,
Au lancement de mon fichier, un premier Userform s'ouvre et tout est OK. Dans le premier listbox je selectionne une référence et cela active le bouton "Composant SAV". En cliquant dessus j'ouvre un autre userform, et dans le premier listbox il n'y a que la marque qui s'affiche. Mon soucis est que je voudrais que le premier listbox soit deja activer, actuellement je dois cliquer dessus pour afficher les choix du deuxième userform.
Je vous joint un exemple.
Merci pour votre aide.

job75 · 18 Août 2010

Re : Activer une listbox

Bonjour dran 200, le forum,

Dans la macro Private Sub UserForm_Activate() de UserForm2, mettre à la fin :

Code:

ListBox1.Selected(0) = True

A+

dran_200 · 18 Août 2010

Re : Activer une listbox

Re bonjour,
Merci pour ton aide. Ca ne fonctionne pas, ça affiche des résultats dans le deuxième listbox, mais pas les bons ! et si je clique dessus ça n'affiche pas les résultats dans les autres listbox, je dois recliquer sur la listbox 1. Il y a une base de données pour chaque userform.
Merci

job75 · 18 Août 2010

Re : Activer une listbox

Re,

Le code active la ListBox1 de UserForm2, point.

Si vous voulez aussi activer celle de UserForm6, mettez-le aussi dans sa macro UserForm_Initialize.

A+

Robert · 18 Août 2010

Re : Activer une listbox

Bonjour Dran, Job, bonjour le forum,

Chez moi ça marche impeccable... Es-tu sûr d'avoir mis le code de Job au bon endroit ?

dran_200 · 19 Août 2010

Re : Activer une listbox

Bonjour
ça fonctionne, merci pour votre aide

Activer une listbox

dran_200

XLDnaute Occasionnel

Pièces jointes

job75

XLDnaute Barbatruc

dran_200

XLDnaute Occasionnel

job75

XLDnaute Barbatruc

Robert

XLDnaute Barbatruc

dran_200

XLDnaute Occasionnel

Discussions similaires