Ajouter données d'un bouton

bonsoir

je souhaiterais savoir comment ajouter des informations dans une base de données (sur une ligne dans la feuille excel) à l'aide d'un userform type formulaire (ajouter les informations à l'aide d'un bouton en fonction de plusieurs textbox).

Merci pour votre aide

sankoukai

Bonjour,

Je pense que le sujet à été abordé sur le forum

Une manière parmi tant d'autres.

Private Sub CommandButton1_Click()
'On recherche la dernière ligne dans la colonne des noms
Dim LR: LR = Sheets("clients").Range("A" & Rows.Count).End(xlUp).Row: LR = LR + 1

    Application.ScreenUpdating = False
    Sheets("clients").Range("A" & LR).Value = TextBox1
    Sheets("clients").Range("B" & LR).Value = TextBox2
    'etc..

    Application.ScreenUpdating = True

End Sub

Voili, voilou,

bonsoir

merci bcp pour ton aide

sankoukai