Comment envoyer valeur textbox dans cellule vides
Résolu
grandflo59
Messages postés
5
Statut
Membre
-
grandflo59 Messages postés 5 Statut Membre -
grandflo59 Messages postés 5 Statut Membre -
Bonjour, je suis assez novice encore au niveau du vba, je bloque sur mon deuxieme fichier avec vba.
En effet j'aimerais afficher mes textbox à la suite du tableau et ainsi de suite.
exemple : nom en A2, une fois que j'ai valider, que le prochain nom soit en A3.
Je ne c'est pas comment je peu joindre le fichier :s l'userform est prêt il me manque ce code pour que ca fonctionne.
Merci a tous :)
En effet j'aimerais afficher mes textbox à la suite du tableau et ainsi de suite.
exemple : nom en A2, une fois que j'ai valider, que le prochain nom soit en A3.
Je ne c'est pas comment je peu joindre le fichier :s l'userform est prêt il me manque ce code pour que ca fonctionne.
Merci a tous :)
3 réponses
-
Bonjour
Pour trouver la 1° cellule vide
Dim ligvid as integer
ligvid==columns("A").find("",Range("A1"),xlvalues).row
Cells(Ligvid,"A")=tontextbox
Michel -
Bonjour
F01 est le CodeName de la Feuil
Private Sub ButValide_Click()
With F01
Nlig = .Range("A" & Rows.Count).End(xlUp).Row + 1
.Range("A" & Nlig).Value = TextBox1
.Range("B" & Nlig).Value = TextBox2
End With
End Sub
A+
Maurice -
Merci a vous :D ca marche bien ca me permet d'avancer sur mon fichier :) bonne soirée :)