PRUDHOMME12
XLDnaute Nouveau
bonsoir à tous ci -dessous ma question
remplir une ligne avec 3 textbox et passer a la ligne suivante
remplir une ligne avec 3 textbox et passer a la ligne suivante
Private Sub CommandButton1_Click()
Cells(Rows.Count, 1).End(xlUp)(2).Resize(, 3) = Array(TextBox1, TextBox2, TextBox3)
End Sub