Doubler / Tripler ... le texte d'une cellule

Bonjour,

Alors j'ai un petit soucis de "output".

J'ai une liste de Nom dans la colonne A, un nombre de personne dans la colonne B, Je souhaites que Excel multiplie les cellules où le nombre de personnes est supérieure à 1. Exemples :

A1 : Smith / B1 : 1 / C1: Smith

A2 : George / B2 : 2 / C2: George / C3 : George

A3 : Dupont / B3: 3 / C4 : Dupont / C5 : Dupont / C6 : Dupont

etc

Auriez-vous une solution d'une formule qui puisse me donner un output comme ça ou en ligne ou sur une autre feuille, mais de façon à avoir le bon nombre de Dupont dans mon Output.

Merci de votre aide

Bryan

Bonjour le Forum,

Bonjour colonelrenard,

un essai en fichier joint

Cordialement

Debutant86 a écrit :

Bonjour le Forum,

Bonjour colonelrenard,

un essai en fichier joint

Cordialement

Bonjour Debutant86,

Merci pour cette réponse rapide. C'est là où malheureusement le bas blesse étant donné que mon output doit être en une colonne.

Merci de ton retour qui donne le début d'une piste.

Cordialement,

Bryan

Bonjour,

un fichier exemple proche du réel est toujours bienvenu °_°

P.

Bonjour,

Testes ce qui suit. Adapter la boucle (ici juste les 5 premières lignes) :

Sub Test()

    Dim I As Integer

    For I = 1 To 5

        Range(Cells(I, 3), Cells(I, Cells(I, 2).Value + 2)).Value = Cells(I, 1).Value

    Next I

End Sub

En colonne A les noms à dupliquer et en colonne B le nombre voulue supérieur à 0

patrick1957 a écrit :

Bonjour,

un fichier exemple proche du réel est toujours bienvenu °_°

P.

Voilà, J'espère que ça peut aider ...

Merci

Theze a écrit :

Bonjour,

Testes ce qui suit. Adapter la boucle (ici juste les 5 premières lignes) :

Sub Test()

    Dim I As Integer

    For I = 1 To 5

        Range(Cells(I, 3), Cells(I, Cells(I, 2).Value + 2)).Value = Cells(I, 1).Value

    Next I

End Sub

En colonne A les noms à dupliquer et en colonne B le nombre voulue supérieur à 0

C'est peut être bête comme question mais comment on peut mettre un script de code dans une cellule Excel

Merci