comment remplir une listbox dans un userform avec un tableau structuré

Bonjour,

quelqu'un a-t-il une méthode simple pour remplir une listbox d'un formulaire avec les données contenues dans un tableau structuré ?

Merci d'avance

Bonjour,
Voici un exemple simple avec un contrôle ListBox nommé lst_Data et un tableau structuré nommé t_Stagiaire

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub UserForm_Initialize() Dim Rng As Range Set Rng = Range("t_Stagiaire") With Me.lst_Data .List = Rng.Value .ColumnCount = Rng.Columns.Count End With Set Rng = Nothing End Sub

---

Hello,
voici un code similaire à celui de Philippe (peut-être en plus la gestion de l'en-tête):

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub UserForm_Initialize() Dim MonTableau As ListObject Set MonTableau = Worksheets("Country").ListObjects("Tableau1") With Me.ListBox1 .ColumnHeads = True .ColumnCount = MonTableau.ListColumns.Count .ColumnWidths = "85;40;50;50;70;70" .RowSource = MonTableau.DataBodyRange.Address End With End Sub

---

Pièce jointe 626625

Pièce jointe 626626

ami calmant, J.P

Merci beaucoup à vous deux, c'est exactement ce que je cherchais.:D:D

Bonne journée

Bonjour à vous,

je m'excuse de vous solliciter à nouveau.

J'ai personnalisé le formulaire rendez-vous d'outlook afin de pouvoir choisir un client.

pour cela j'ai mis en page 2 une combobox afin de pouvoir selectionner le client.

Je souhaite remplir la combobox avec la colonne d'un TS excel.

est-ce possible, et si oui comment ?

Bonne réception et bonne soirée