Discussion :

[windsor]

Bonjour,

ça fait un bon petit moment que je cherche une solution à mon pb, j'ai essayé un paquet de possibilités mais je ne sais plus quoi faire maintenant.

Je m'explique, je pars d'une feuille excel dans laquelle il y a 6 colonnes et des lignes qui peuvent varier. Je charge chaque colonne dans un tableau de variables à une colonne, ensuite j'aimerais pouvoir affecter pour chaque colonne de ma listbox un tableau de variables.

J'arrive uniquement à mettre un tableau de variables dans la première colonne de ma lisbox et rien d'autre.

Quelqu'un connait-il un moyen ?

En attente d'un peu d'aide, merci d'avance

[conconbrr]

Salut,

J'ai déjà fait ce genre de truc par le passé mais ça remonte un peu pour que je m'en souvienne juste comme ça...

Dans un premier temps, je te proposerais plutôt de récupérer tes 6 colonnes Excel sous forme d'un seul tableau, puis d'essayer d'attribuer ce tableau matriciel a ton listbox.

P.S: Au cas où, la méthode d'attribution d'une plage à un tableau ressemble à ça:

Code :

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

1
2
3
dim t_monTableau_v as variant
 
t_monTableau_t=worksheets(i).range(cel1,cel2).value

Il est très important de déclarer ton tableau en tant que variant. Bien entendu cel1 et cel2 sont à remplacer par des objet range valides.

[mapeh]

bonsoir,

un essai :

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub UserForm_Initialize()
Dim DerLig As Long
DerLig = Cells.Find("*", , , , xlByRows, xlPrevious).Row
Tbl = Range("A2:F" & DerLig)
With Me.ListBox1
    .ColumnCount = 6
    .ColumnWidths = "50;30;30;30;30;30"
    .List = Tbl
End With
End Sub

[windsor]

Bonsoir et merci pour votre aide, ça fonctionne.