abtony
XLDnaute Impliqué
Bonjour le forum,
je souhaite savoir si ce code est possible ?
j'ai 18 textbox, une fois valider sur le bouton on insère le contenu dans les cellules de la colonne A a R, mais je suis pas sur que ca puisse fonctionner.
Je cherche depuis un moment, et j'ai une erreur a la ligne col =....
Pouvez vous me dire si c'est viable ou pas.
Merci d'avance
je souhaite savoir si ce code est possible ?
Code:
Private Sub CommandButton1_Click()
ligne = ActiveSheet.Range("A65535").End(xlUp).Row + 1
col = ActiveSheet.Range("A") & ColumnCount + 1
For x = 1 To 18
ActiveSheet.Cells(ligne, col).Value = Controls("textbox" & x).Value
Next x
End Sub
j'ai 18 textbox, une fois valider sur le bouton on insère le contenu dans les cellules de la colonne A a R, mais je suis pas sur que ca puisse fonctionner.
Je cherche depuis un moment, et j'ai une erreur a la ligne col =....
Pouvez vous me dire si c'est viable ou pas.
Merci d'avance