Userform avec boutton et textbox

ilies -  
boromba Messages postés 736 Statut Membre -
Bonjour,
j'ai fais un userform sur excel avec un boutton et textbox je veux lorsque je j'ecrire un texte dans textbox et je click sur le boutton le text s'affiche dans la cellule A2 et si je repete elle s'afiche sur A3.....etc
Configuration: Windows XP Internet Explorer 8.0

1 réponse

  1. boromba Messages postés 736 Statut Membre 201
     
    SALUT,
    Private Sub LE NOM DE TON BOUTON_Click()
    Dim iRow As Long
    Dim ws As Worksheet
    Set ws = Worksheets("LE NOM DE TA FEUILLE")
    iRow = ws.Cells(Rows.Count, 1) _
    .End(xlUp).Offset(1, 0).Row
    ws.Cells(iRow, 1).Value = Me.LE NOM DE TON TEXTBOX.Value
    Me.LE NOM DE TON TEXTBOX.Value = ""
    End Sub
    0