VBA USERFORM Transfert de data

Le 07/09/2017 à 14:01

Bonjour tout le monde,

je suis débutant sur VBA, j'ai créer une userform où on rentre plusieurs data, j'aimerais que quand je clique sur enregistrer ça me transfère la data dans un tableau déjà créer sur excel et effacer les données dans la userform pour faire rentrer d'autres a nouveau et les transférer après dans le meme tableau mais dans la ligne d'en bas, et quand j'atteint la limite de mon tableau ça me sort msgbox : Vous avez atteint la limite de votre tableau, j'ai essayé avec une loop mais ça ne marche pas, je sais faire que pour une colonne entière mais pas pour une plage précise.

Merci beaucoup de votre aide

Le 07/09/2017 à 14:10

bonjour,

sans fichier, une réponse générale,

imaginons que ton bouton s'appelle valider

Private Sub valider_Click()
    With Sheets("feuil1")    'pour mettre les données sur ala feuil1
'première ligne disponible
        ligne = .Cells(.Rows.Count, 1).End(xlUp).Row + 1
        If ligne > 500 Then MsgBox "plus de place dans le tableau": Exit Sub    ' ajuster la limiter
        .Cells(ligne, "A") = textbox1.Value    ' pour mettre le contenu de textbox1 en colonne A
        textbox1.value="" ' remise à blanc de textbox1
    End With
End Sub
Rechercher des sujets similaires à "vba userform transfert data"