Bonjour

merci pour votre aide

j'ai 9 colonnes sur une Worksheet
et 9 ListBox sur Form1

Chaque colonne doit alimenter sa ListBox

Problème simple

Mais impossible de trouver la bonne déclaration pour les variables


Voici un exemple

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim Tableau_Col
Dim Tableau_ListB
 
Tableau_Col = array(1,4,5,8)
Tableau_ListB = array("LB_Tarif","LB_Charge","LB_Dep","LB_Benef")
 
Boucle i pour les Tableau_Col(i)
 
    Plage = range(Colonne en Cours)
    For each Cellule dans Plage
        Tableau_ListB(i).additem Cellule      ---> erreur
    Next Cellule
 
Next Tableau_Col
Tout fonctionne très bien si je mets le nom de la ListBox au lieu de "Tableau_ListB" (mais il faudra répéter 9 fois...)

Merci