Copier Valeur ComboBox d'un UserForm sur feuille avec increment

Résolu/Fermé
freeycap Messages postés 87 Date d'inscription lundi 27 octobre 2014 Statut Membre Dernière intervention 3 septembre 2018 - 3 déc. 2015 à 20:27
freeycap Messages postés 87 Date d'inscription lundi 27 octobre 2014 Statut Membre Dernière intervention 3 septembre 2018 - 3 déc. 2015 à 21:54
Bonjour,

En cliquant sur un bouton placé dans mon UserForm1, je veux copier la valeur de mon ComboBox1 de mon UserForm1 sur la Feuil3 de mon document, à partir de la ligne 2 sur la colonne A.
Et surtout, à chaque fois que je clique sur le bouton pour copier la valeur (parce que les valeurs sont rattachées à des noms différents après), je veux qu'elle se place sur la ligne vide suivante de la colonne A.

Voici ce que j'ai essayé :

Private Sub CommandButton1_Click()

With Worksheets("FEUIL3")
UserForm1("ComboBox1").Range("ComboBox1").Copy .Cells(.Rows.Count, "A").End(xlUp)(2)
End With


End Sub

Ben... ca marche pas...
Ou est le problème... j suis un peu newbie, mais j'essaie...
Merci pour votre aide.

Y.
A voir également:

1 réponse

freeycap Messages postés 87 Date d'inscription lundi 27 octobre 2014 Statut Membre Dernière intervention 3 septembre 2018
3 déc. 2015 à 21:06
Ca y est j'ai trouvé...
Merci à ceux qui ont pris la peine de lire ma question.

Y.
0
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
3 déc. 2015 à 21:44
Bonsoir,
C'est ce que tu as trouvé ?
    .Cells(.Cells(.Rows.Count, "A").End(xlUp).Row, 2) = Me.ComboBox1
0
freeycap Messages postés 87 Date d'inscription lundi 27 octobre 2014 Statut Membre Dernière intervention 3 septembre 2018
3 déc. 2015 à 21:53
c'est ca que j'ai trouvé :

Dim DerLig As Integer

With Worksheets("Listing")
DerLig = .Range("N" & Rows.Count).End(xlUp).Row + 1
.Range("N" & DerLig).Value = ComboBox1.Value
0
freeycap Messages postés 87 Date d'inscription lundi 27 octobre 2014 Statut Membre Dernière intervention 3 septembre 2018
3 déc. 2015 à 21:54
tres efficace
0