[VBA-E] Copier à la suite...

bonjour à tous, étant un parfait noob en VBA, je n'arrive pas à faire la chose suivante:

Je cherche à ce que les données d'un userform se copient à la suite les unes des autres lorsque je valide.

Exemple simplifié:
j'ai une textbox(TB) et un commandbutton(CB) dans mon UF

Je valide avec le CB et les données de TB se placent en feuille1 A1
je répéte l'opération et les données se placent en feuille1 A2
et ainsi de suite

Voila tout!
merci à ceux qui pourront m'apporter une réponse

Key22

Bonjour,
Voici un code, tu n'as qu'a changer les nom de ton CommandButton et TextBox.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Private Sub CommandButton1_Click() Dim En_Colone, En_Ligne Range("A1").Select En_Colone = ActiveCell.Column En_Ligne = ActiveCell.Row + 1 While Not IsEmpty(ActiveCell.Value) Cells(En_Ligne, En_Colone).Activate En_Ligne = En_Ligne + 1 Wend ActiveCell.Offset(0, 0).Range("A1").Select ActiveCell.Value = UserForm1.TextBox1 TextBox1.Text = "" TextBox1.SetFocus End Sub

---

jpleroisse

Parfait!
Merci Beaucoup!!!

Key22