Listbox ajout et copie

[WocaM]

Bonjour le forum
Ne maitrisant pas bien du tout les listbox et après avoir cherché sur le forum, je ne trouve pas ce que je veux

je voudrais dans un premier temps remplir mon listbox avec les valeurs du combobox2 en colonne 1 et textbox6 en colonne

Ensuite
Mon userform est divisé en 2 partie, la partie de gauche sont des champs commun et la partie de droite me permet de remplir le listbox
Actuellement, quand on clique sur le CommandButton1 cela copie tous les différents champs du userform (partie de gauche + listbox) dans un tableau mais si j'ai plusieurs lignes dans mon listbox cela copie tout le listbox dans une seule cellule
Alors que je voudrais crée une entrée par ligne dans mon tableau tout en gardant les valeurs de la partie gauche de mon userform

J’espère être assez clair
D’avance merci de l'aide que vous pourrez m'apporter
Gildas

 

[Dranreb]

Bonjour.
Quelque chose comme ça :

      Set PlgLig = .Rows(MaLigne).Resize(ListBox1.ListCount)
      Select Case ListBox1.ListCount
       Case Is > 1: PlgLig.Columns("G").Value = ListBox1.List
       Case 1: PlgLig.Columns("G").Value = ListBox1.List(0)
         End Select

 

[WocaM]

Bonjour

J'ai essayé ton bout de code mais que je lance le userform, Excel me dit

Erreur de compilation:
Référence incorrecte ou non qualifié

entre temps j'ai réussi a réaliser ce que je voulais faire
Merci quand même