VBA Excel ( formulaire userform insert ligne)
starboost
-
xxx129 -
xxx129 -
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
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
A voir également:
- VBA Excel ( formulaire userform insert ligne)
- Whatsapp formulaire opposition - Guide
- Aller à la ligne excel - Guide
- Liste déroulante excel - Guide
- Partager photos en ligne - Guide
- Touche insert - Guide