Répéter la macro plusieurs fois

[matrix]

Bonjour à tous,

Je voudrais savoir comment modifier cette macro si:

Dim Ligne As Long
Ligne = (Range("f65000").End(xlUp).Row + 1)
    
    Range("A" & Ligne) = ("H")
    Range("B" & Ligne) = ("A")
    Range("C" & Ligne) = (Label7)
    Range("D" & Ligne) = (ComboBox1.Text)
    Range("e" & Ligne) = (ComboBox3)
    Range("f" & Ligne) = (ComboBox4)
    Range("g" & Ligne) = (ComboBox5.Text)
    Range("j" & Ligne) = (TextBox2.Text)
    Range("k" & Ligne) = (TextBox3.Text)
    Range("l" & Ligne) = (TextBox4.Text)
    Range("m" & Ligne) = (TextBox5.Text)
    Range("t" & Ligne) = ("COL")
    Range("AA" & Ligne) = ("M")

La modification doit faire en sorte que selon le nombre inscrit dans le TextBox10, il doit recopier la macro le même nombre de fois.

Exemple, s’il est marqué 5 dans le textbox10, il va copier sur 5 lignes les informations de la macro ci-haut.

Comment faire s.v.p.

Merci pour votre aide.

 

[Compte Supprimé 979]

Re : Répéter la macro plusieurs fois

Salut Matrix, ici Néo 😀

Essaye ça 😉

Dim Ligne As Long, NbFois as Integer, I as Integer
NbFois = TextBox10.Value
For I = 1 to NbFois
    Ligne = (Range("F" & Rows.Count).End(xlUp).Row + 1)
    Range("A" & Ligne) = ("H")
    Range("B" & Ligne) = ("A")
    Range("C" & Ligne) = (Label7)
    Range("D" & Ligne) = (ComboBox1.Text)
    Range("e" & Ligne) = (ComboBox3)
    Range("f" & Ligne) = (ComboBox4)
    Range("g" & Ligne) = (ComboBox5.Text)
    Range("j" & Ligne) = (TextBox2.Text)
    Range("k" & Ligne) = (TextBox3.Text)
    Range("l" & Ligne) = (TextBox4.Text)
    Range("m" & Ligne) = (TextBox5.Text)
    Range("t" & Ligne) = ("COL")
    Range("AA" & Ligne) = ("M")
Next I

A+

 

[matrix]

Re : Répéter la macro plusieurs fois

Merci Beaucoup, ça fonctionne super

 

[GCFRG]

Re : Répéter la macro plusieurs fois

Bonjour Matrix, BrunoM45,
je croyais que le format par défaut d'une TextBox était "text", j'aurais mis:
NbFois = Cdbl(TextBox10.Value)

Mais si çà marche tant mieux
on apprend tous les jours

Cordialement
Gilbert

 

[Compte Supprimé 979]

Re : Répéter la macro plusieurs fois

Salut GCFRG,

Bonne remarque 😉
Mais le post était de faire une boucle, alors je n'ai touché à rien d'autre 😀

Sinon effectivement j'utilise également ".value"

A+