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

1 réponse

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