Copier X fois données d'un userform
Résolu/Fermé
A voir également:
- Copier X fois données d'un userform
- L x l x h ✓ - Forum Loisirs / Divertissements
- Copier video youtube - Guide
- Super copier - Télécharger - Gestion de fichiers
- Direct x 12 - Télécharger - Pilotes & Matériel
- Qu'est ce qu'une femme fait 3 fois par jour - Forum Loisirs / Divertissements
1 réponse
f894009
Messages postés
16904
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
18 mars 2023
1 678
31 août 2017 à 14:49
31 août 2017 à 14:49
Bonjour,
si j'ai bien compris,copiez ces lignes
avant
si j'ai bien compris,copiez ces lignes
Derligne = Range("a100000").End(xlUp).Row + 1
cpt = CInt(TextBox1)
For i = 1 To cpt
Cells(Derligne, 1).Value = TextBox1
Cells(Derligne, 2).Value = TextBox2
Cells(Derligne, 3).Value = TextBox3
Derligne = Derligne + 1
Next
MsgBox " Traitement fini"
avant
Unload UserForm1
31 août 2017 à 15:30
Merci beaucoup, quel temps gagné