XL 2016 Copier plusieurs fois une ligne en fonction de la quantité indiquée dans l'une des colonnes de la ligne.

[BPM]

Bonjour,
Je viens pour solliciter votre aide pour l'écriture d'un code VBA.
J'aimerais que le code puisse multiplier certaines lignes en conservant toutes les informations de la ligne, et le nombre de fois qu'il faut copier la ligne est déterminé par rapport à une autre colonne. Pour être plus claire : si dans la colonne "quantité" la valeur de la ligne vaut 3, alors il faudrait copier toute la ligne le nombre de fois la valeur-1, donc ici ça sera copier 2 fois pour avoir un total de 3 lignes identiques. Et le point supplémentaire est que la valeur dans la colonne "quantité" de ces lignes doit devenir automatiquement 1, ce qui fera que le tableau aura 3 lignes identiques dont chacune la quantité vaut "1". Et ce programme doit le faire pour l'ensemble du tableau de ma feuille Excel.
J'espère que c'est assez bien expliquer, je ne sais vraiment pas comment écrire ce code, donc votre aide me sera très précieuse. Je joins un classeur exemple.
Merci à vous.

 

[M12]

Bonjour,
Un essai

 

[Lolote83]

Bonjour BPM, M12,
Encore en retard mais voici ma contribution.
@+ Lolote83

 

[BPM]

Bonjour,
Un essai

Bonjour M12, merci pour ta proposition de code. Je voudrais juste savoir est-ce qu'il y a moyen de ne pas spécifier le nom de la feuille ? Parce que en gros le nom de la feuille est susceptible d'être changé, si le programme peut comprendre que c'est sur la feuille active qu'il doit effectuer le programme.

 

[M12]

Re,
Comme ceci

 

[BPM]

Bonjour BPM, M12,
Encore en retard mais voici ma contribution.
@+ Lolote83

Pas de soucis, vous n'êtes pas en retard. Merci pour votre contribution.

 

[BPM]

M12, Lolote83, les deux codes que vous m'avez proposés fonctionnent très bien. Je vous remercie pour votre temps et votre aide précieuse.

 

[BPM]

Re,
Comme ceci

Merci beaucoup.