Copie d'une liste issue d'un Userform

Bonjour la communauté,

Une fois de plus, je me tourne vers vous ...

Après avoir pas mal cherché, je n'ai pas réussi à finaliser ce que je voulais faire.

J'ai créé un Userform qui reprend une liste de nom.

Je voudrais pouvoir sélectionner certains noms de cette liste et les copier dans mon tableau à l'endroit ou se trouve la cellule active sur ma feuille.

Exemple, je sélectionne la cellule A12, j'ouvre mon Userform, je sélectionne un ou plusieurs noms, je valide et les noms sont copiés dans mon tableau en commençant à la cellule A12.

J'ai donc réussi une partie du projet mais lorsque je valide, le nom ou les noms commencent à être copier une cellule au dessus de celle que j'ai sélectionné. Dans mon exemple cité, le nom commencera à être copier cellule A11 au lieu de A12.

Un peu d'aide me serait bien utile

Ci-joint mon fichier.

bonjour,

il faut commencer par initialiser la variable ligne, sinon quand tu rentres dans la boucle

tu t'adresses à

ActiveCell.Cells(0, 1) 

ce qui correspond effectivement à un décalage négatif

Private Sub CommandButton1_Click()
Ligne = 1
    For i = 0 To Me.ListBox1.ListCount - 1
     If Me.ListBox1.Selected(i) = True Then
       ActiveCell.Cells(ligne, 1) = Me.ListBox1.List(i)
       ligne = ligne + 1
     End If
  Next i
End Sub

A+

Merci pour cette réponse rapide ...

et merci aussi pour ton explication !

Bonne journée.