Discussion :

[jeo13]

Bonjour a tous

J'ai une petite question une listbox contenue dans un de mes userform.
La listbox liste des noms de produits. La taille de la liste n'est pas variable (300 produits)

La Rowsource est definie par une plage de donnee fixe dans une feuille Data que j'ai appellee ProductsList (=Data!$M$9:$N$310).

Jusque la pas de probleme!

En fait ma liste de produits se met a jour lorsque l'utilisateur choisit un code via le userform. Le code est utilise dans une formule qui retourne la liste de produits dans la feuille Data.

Pour certains codes, la formule peut mettre jusqu'a plusieurs secondes pour retrouver la liste des produits.
La formule (dans une feuille que j'ai appelle Data) affiche la chaine "Retrieving..." en cellule K5 lorsque elle recherche les produits d'un nouveau code correspondant.

Si c'est le cas, en Cellule M5 et M6, j'ecris via une formule:
M5 -> "Loading..." =IF(LEFT(K5,10)="Retrieving","Loading","")
M6 -> "Please wait" =IF(LEFT(K5,10)="Retrieving","Please Wait...","")



Ce que je souhaite faire et que je n'arrive pas:
Si en cellule K5 on a "Retrieving..." alors la source de la liste devient la plage Data!$M$5:$N$6
sinon c'est la plage ProductsList (=Data!$M$9:$N$310).

Y a-t-il quelqu'un qui pourrait m'orienter pour faire donc varier la source de la listbox selon la valeur contenue en K5?

Merci beaucoup d'avance pour votre aide

[jeo13]

Je me suis mal exprime dans mon precedent post.

En fait, j'aurais plutot du ecrire:

Ce que je souhaite faire et que je n'arrive pas:
Tant qu'en cellule K5 on a "Retrieving..." alors la source de la liste devient la plage Data!$M$5:$N$6
sinon c'est la plage ProductsList (=Data!$M$9:$N$310).

[patricktoulon]

bonjour

Code :

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

1
2
3
4
5
6
7
8
9
10
 
 sub remplissage_conditionel()    
dim tableau as variant 
if sheets("Data").range("k5").value="Retrieving..." then
 
tableau=sheets("Data").range("m5:n6").value
else
tableau=sheets("Data").range("m9:n310").value
listbox1.list=tableau
end sub

noublie pas que ta listebox doit avoir le meme nombres de colonne que celles constituant le tableau soit 2 colonnes

au plaisir