Userform de saisie

[Gexk5]

😱 Bonsoir le forum,
Voici mon souci, ayant recupéré un userform sur le forum et l'ayant adapté à mon idée, voici mes deux problèmes:
1) Comment à partir de ce Userform , renseigner un ou plusieurs champs et que cela s'inscrive dans ma base??? (Cases verte de mon User)

2) Arrivé à la dernière ligne de ma base, j'ai une erreur d'execution '380', comment supprimer cette erreur???

Merci de vos réponses
@micalement

Ci joint le lien pour mon fichier pour plus d'explication
http://cjoint.com/?lDvmhVHdnx

@micalement

 

[lapix]

Re : Userform de saisie

Bonsoir,

Pour le 2 il te suffit de modifier comme cela :

Private Sub SpinButton1_SpinDown()
With ComboNom
If .ListIndex < .ListCount - 4 Then .ListIndex = .ListIndex + 4
End With
End Sub

ca t'enleveras l'erreur 380 qui dit que tu cherche un element plus grand que le nb d'elements de la liste.

Pour le 1 il te faut faire comme dans ta procedure combonom_change en inversant le code de part et d'autre du signe egal

Bon courage