Recopier Tableau Excel dans ListBox Multicolonne

[lau.29]

Bonjour à tous !

J'ai une question relativement simple (pour des codeurs confirmé^^).

J'ai un tableau de données sur une feuille Excel (au milieu de ma feuille) de 10 lignes par 10 colonnes. Je souhaite recopier ce tableau dans un listBox multicolonne dans un Userform.

J'ai déjà obtenu un petit exemple de cette procédure par quelqu'un de ce forum (je le remercie encore une fois), mais je n'y arrive tjs pas...

Quelqu'un peu-il m'indiquer les lignes de codes à écrire ou m'envoyer un exemple concret.......

MERCI D'AVANCE !!!!!!

 

[bqtr]

Re : Recopier Tableau Excel dans ListBox Multicolonne

Bonjour lau.29

Un exemple à adapter à ton cas:

Private Sub UserForm_Initialize()
Dim Tablo
Tablo = Sheets("Feuil2").Range("A1:J" & Sheets("Feuil2").Range("A65536").End(xlUp).Row)
    With ListBox1
      .ColumnCount = UBound(Tablo, 2)
      .List = Tablo
    End With
    
End Sub

A+

 

[lau.29]

Re : Recopier Tableau Excel dans ListBox Multicolonne

Ca marche !!!!!!!🙂

Merci bcp pour ton aide !!!!!!🙂

Tchao !!!!