VBA Excel ( formulaire userform insert ligne)

Bonjour,

Je suis nouveau dans VBA excel donc j'essaie d'apprendre tout seul mais je suis bloque sur un point essentiel pour mon travail.
En faite j'aimerais grace à un userform inserer une ligne à la fin de mon tableau excel. Chaque listbox ou combox va dans une colonne dédié.
Mon code est le suivant :

Sub vindex()
'appel de la variable pour la ligne à choisir'
Dim vindex as string
vindex = activecell.row
Range("C1525").Select
Selection.End(xlUp).Select

end sub

Ensuite

Private Sub CommandButton1_Click()
Dim Nom As String
Nom = TextBox1.Value
If Nom = "" Then Exit Sub
Msg = MsgBox("Voulez-Vous Ajouter : " & Nom, vbYesNo)

Cells(vindex,1).text = Textbox1
Cells(vindex,2).text = Textbox2
Cells(vindex,3).text = Textbox3
Cells(vindex,5).text = Listbox1
.
.
.

end sub

Je fais surement des erreurs partout mais j'aimerais que l'on me dise comment faire.
J'avais reussi en insérent une ligne mais c pas ce que je voulais.

Merci d'avance

Configuration: Windows XP Internet Explorer 6.0