OVH Cloud OVH Cloud

Pb initialisation d'un ListBox

6 réponses
Avatar
François
Bonjour à tous,
Ci-dessous ne fonctionne pas :

Private Sub UserForm_Initialize()
Lb_Exercice.Value = "(Tous)"
Lb_Exercice.RowSource = "tbgris5!Exercice"

A l'affichage de mon UF mon ListBox (renommé Lb_Exercice) ne récupère
pas la valeur (Tous) et dans les propriétés, RowSource est également à
blanc!!

Merci de votre aide.
Bonne journée
François

6 réponses

Avatar
Ellimac
Bonjour,

Lb_Exercice.RowSource = range("Exercice").Address
devrait résoudre ton problème

Camille

-----Message d'origine-----
Bonjour à tous,
Ci-dessous ne fonctionne pas :

Private Sub UserForm_Initialize()
Lb_Exercice.Value = "(Tous)"
Lb_Exercice.RowSource = "tbgris5!Exercice"

A l'affichage de mon UF mon ListBox (renommé Lb_Exercice)
ne récupère

pas la valeur (Tous) et dans les propriétés, RowSource
est également à

blanc!!

Merci de votre aide.
Bonne journée
François


.



Avatar
François
Bonjour Camille et merci !
J'ai bien ma liste de choix qui s'affiche
mais la valeur (Tous) n'est pas en surbrillance et au final
n'est pas mémorisée ..

Une autre idée ??
Merci par avance
François

"Ellimac" a écrit dans le message
news: 448f01c3e3ec$6ce379a0$
Bonjour,

Lb_Exercice.RowSource = range("Exercice").Address
devrait résoudre ton problème

Camille

-----Message d'origine-----
Bonjour à tous,
Ci-dessous ne fonctionne pas :

Private Sub UserForm_Initialize()
Lb_Exercice.Value = "(Tous)"
Lb_Exercice.RowSource = "tbgris5!Exercice"

A l'affichage de mon UF mon ListBox (renommé Lb_Exercice)
ne récupère

pas la valeur (Tous) et dans les propriétés, RowSource
est également à

blanc!!

Merci de votre aide.
Bonne journée
François


.



Avatar
François
Halte au feu !
J'ai trouvé :
il fallait *d'abord* mettre l'instruction:
Lb_Exercice.RowSource = "tbgris5!Exercice"
et ensuite Lb_Exercice.Value = "(Tous)"
et non l'inverse.

Moi content, bonne journée
François
-------------------------------------------------------------------

"François" a écrit dans le message news:
#wkUES$
Bonjour Camille et merci !
J'ai bien ma liste de choix qui s'affiche
mais la valeur (Tous) n'est pas en surbrillance et au final
n'est pas mémorisée ..

Une autre idée ??
Merci par avance
François

"Ellimac" a écrit dans le message
news: 448f01c3e3ec$6ce379a0$
Bonjour,

Lb_Exercice.RowSource = range("Exercice").Address
devrait résoudre ton problème

Camille

-----Message d'origine-----
Bonjour à tous,
Ci-dessous ne fonctionne pas :

Private Sub UserForm_Initialize()
Lb_Exercice.Value = "(Tous)"
Lb_Exercice.RowSource = "tbgris5!Exercice"

A l'affichage de mon UF mon ListBox (renommé Lb_Exercice)
ne récupère

pas la valeur (Tous) et dans les propriétés, RowSource
est également à

blanc!!

Merci de votre aide.
Bonne journée
François


.







Avatar
Michel Gaboly
Bonjour,

Inverse l'ordre des 2 instructions : pour utiliser Value, il faut d'abord
que la liste ait été remplie.



Bonjour Camille et merci !
J'ai bien ma liste de choix qui s'affiche
mais la valeur (Tous) n'est pas en surbrillance et au final
n'est pas mémorisée ..

Une autre idée ??
Merci par avance
François

"Ellimac" a écrit dans le message
news: 448f01c3e3ec$6ce379a0$
Bonjour,

Lb_Exercice.RowSource = range("Exercice").Address
devrait résoudre ton problème

Camille

-----Message d'origine-----
Bonjour à tous,
Ci-dessous ne fonctionne pas :

Private Sub UserForm_Initialize()
Lb_Exercice.Value = "(Tous)"
Lb_Exercice.RowSource = "tbgris5!Exercice"

A l'affichage de mon UF mon ListBox (renommé Lb_Exercice)
ne récupère

pas la valeur (Tous) et dans les propriétés, RowSource
est également à

blanc!!

Merci de votre aide.
Bonne journée
François


.




--
Cordialement,

Michel Gaboly
http://www.gaboly.com


Avatar
François
Bonjour Michel,

Ben oui désolé pour le dérangement, mais je viens juste de me mettre aux UF
et je n'ai pas encore tous les réflexes.
Je risque donc de revenir vers vous avec des questions "basiques" mais je
connais
votre grande indulgence et votre générosité.
Toute ma reconnaissance passée, présente et à venir joyeux contributeurs !

François
-----------------------------------

"Michel Gaboly" a écrit dans le message news:

Bonjour,

Inverse l'ordre des 2 instructions : pour utiliser Value, il faut d'abord
que la liste ait été remplie.



Bonjour Camille et merci !
J'ai bien ma liste de choix qui s'affiche
mais la valeur (Tous) n'est pas en surbrillance et au final
n'est pas mémorisée ..

Une autre idée ??
Merci par avance
François

"Ellimac" a écrit dans le message
news: 448f01c3e3ec$6ce379a0$
Bonjour,

Lb_Exercice.RowSource = range("Exercice").Address
devrait résoudre ton problème

Camille

-----Message d'origine-----
Bonjour à tous,
Ci-dessous ne fonctionne pas :

Private Sub UserForm_Initialize()
Lb_Exercice.Value = "(Tous)"
Lb_Exercice.RowSource = "tbgris5!Exercice"

A l'affichage de mon UF mon ListBox (renommé Lb_Exercice)
ne récupère

pas la valeur (Tous) et dans les propriétés, RowSource
est également à

blanc!!

Merci de votre aide.
Bonne journée
François


.




--
Cordialement,

Michel Gaboly
http://www.gaboly.com






Avatar
Michel Gaboly
Re,

Dérangement, quel dérangement ? ;-))



Bonjour Michel,

Ben oui désolé pour le dérangement, mais je viens juste de me mettre aux UF
et je n'ai pas encore tous les réflexes.
Je risque donc de revenir vers vous avec des questions "basiques" mais je
connais
votre grande indulgence et votre générosité.
Toute ma reconnaissance passée, présente et à venir joyeux contributeurs !

François
-----------------------------------

"Michel Gaboly" a écrit dans le message news:

Bonjour,

Inverse l'ordre des 2 instructions : pour utiliser Value, il faut d'abord
que la liste ait été remplie.



Bonjour Camille et merci !
J'ai bien ma liste de choix qui s'affiche
mais la valeur (Tous) n'est pas en surbrillance et au final
n'est pas mémorisée ..

Une autre idée ??
Merci par avance
François

"Ellimac" a écrit dans le message
news: 448f01c3e3ec$6ce379a0$
Bonjour,

Lb_Exercice.RowSource = range("Exercice").Address
devrait résoudre ton problème

Camille

-----Message d'origine-----
Bonjour à tous,
Ci-dessous ne fonctionne pas :

Private Sub UserForm_Initialize()
Lb_Exercice.Value = "(Tous)"
Lb_Exercice.RowSource = "tbgris5!Exercice"

A l'affichage de mon UF mon ListBox (renommé Lb_Exercice)
ne récupère

pas la valeur (Tous) et dans les propriétés, RowSource
est également à

blanc!!

Merci de votre aide.
Bonne journée
François


.




--
Cordialement,

Michel Gaboly
http://www.gaboly.com





--
Cordialement,

Michel Gaboly
http://www.gaboly.com