Comment envoyer valeur textbox dans cellule vides

Résolu
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 :)

3 réponses

  1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour

    Pour trouver la 1° cellule vide

    Dim ligvid as integer
    ligvid==columns("A").find("",Range("A1"),xlvalues).row
    Cells(Ligvid,"A")=tontextbox


    Michel
    0
  2. foo
     
    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
    0
  3. grandflo59 Messages postés 5 Statut Membre
     
    Merci a vous :D ca marche bien ca me permet d'avancer sur mon fichier :) bonne soirée :)
    0