Bonjour à tous,
Tous d'abord voici le code d'un de mes boutons de mon userform:
A partir de là les informations saisie dans les textbox et combobox s'enregistre dans chaque ligne des colonnes mentionné.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Private Sub CommandButton1_Click() Dim L L = Range("a65536").End(xlUp).Row + 1 Range("A" & L).Value = Ref Range("B" & L).Value = ComboBox1 Range("C" & L).Value = ComboBox2 Range("D" & L).Value = ComboBox3 Range("E" & L).Value = ComboBox4 Unload Me entree.Show End Sub
Seulement je souhaite rajouter un textbox me permettant de saisir un nombre (ex: 3) ce qui après validation de mon bouton insérera autant de fois les valeurs de la textbox (Ref) et combobox (1,2,3,4) dans mon tableau.
Par exemple, si je saisie la référence TOTO dans la textbox "Ref" et la valeur 3 dans la nouvel textbox, il enregistrera trois ligne dans mon tableau avec en colonne A trois fois la référence TOTO.
Ça fait des doublons mais c'est voulu.
Merci d'avance pour votre aide.
Cordialement
Partager