ListBox report ttes colonnes

[JULIE]

Bonjour tout le monde

J'ai un petit probleme
Sur ma feuille 2 j'ai un tableau avec plusieurs colonnes A2:G7
J'ai un UF dans lequel un ListBox referencie ceci
Private Sub UserForm_Initialize()

With ListBox1
.RowSource = 'Feuil2!A2:G7'
.ColumnCount = 2 '2 colonnes visibles
.ColumnWidths = '1;40'
End With
End Sub

Je voudrais que Feuil1 Range('C7') = selection ListBox Colonne A
Feuil1 Range('C8') = selection ListBox Colonne B
Feuil1 Range('C9') = selection ListBox Colonne C
Feuil1 Range('C10') = selection ListBox Colonne D
Feuil1 Range('C11') = selection ListBox Colonne E
Feuil1 Range('C12') = selection ListBox Colonne F
Feuil1 Range('C13') = selection ListBox Colonne G

Comment faire ???

Merci a vous

 

[Hellboy]

Bonjour Julie

Il y a quelque chose qui m'échappe. Tu définis ton listbox avec 2 colonnes seulement et si je comprend bien, tu veux 7 entêtes qui sont dans la colonnes C. ?