Copier le texte affiché dans ma textbox1 a partir de la cellule A25
phil
-
Paf -
Paf -
Bonjour forum,
Je souhaiterai avec une macro copier le texte affiché dans ma textbox1 a partir de la cellule A25 et incrémenté a chaque click
ex:
textbox1 affiché Dupont clickbouton copie texte cell A25
textbox1 affiché Tony clickbouton copie texte cell A26
textbox1 affiché Marc clickbouton copie texte cell A27
Merci à vous.
Private Sub CommandButton1_Click()
With Worksheets("Feuil1")
Nlig = .Range("A21" & Rows.Count).Row + 1
.Range("A" & Nlig).Value = TextBox1
End With
End Sub
Je souhaiterai avec une macro copier le texte affiché dans ma textbox1 a partir de la cellule A25 et incrémenté a chaque click
ex:
textbox1 affiché Dupont clickbouton copie texte cell A25
textbox1 affiché Tony clickbouton copie texte cell A26
textbox1 affiché Marc clickbouton copie texte cell A27
Merci à vous.
Private Sub CommandButton1_Click()
With Worksheets("Feuil1")
Nlig = .Range("A21" & Rows.Count).Row + 1
.Range("A" & Nlig).Value = TextBox1
End With
End Sub
Configuration: Windows / Firefox 66.0
A voir également:
- Copier le texte affiché dans ma textbox1 a partir de la cellule A25
- Excel cellule couleur si condition texte - Guide
- Creer un groupe whatsapp a partir d'un autre groupe - Guide
- Aller à la ligne dans une cellule excel - Guide
- Copier texte pdf - Guide
- Si cellule contient texte alors ✓ - Forum Excel
3 réponses
Bonjour,
Peut-être en remplaçant le code pour déterminer la première ligne libre par :
A+
Peut-être en remplaçant le code pour déterminer la première ligne libre par :
Nlig = .Range("A" & Rows.Count).End(xlUp).Row + 1
A+