Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2010 copier/coller ligne en fonction d'une valeur

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

erwanhavre

XLDnaute Occasionnel
Bonsoir à tous
J'ai encore besoins de vous ...
Vous trouverez en pj le résultat espéré
Je m'explique l'onglet "commande" contient un résumé de commande, j'ai besoin d'éclater celle-ci en autant de ligne qu'il y à dans la colonne en jaune dans la feuille "repart"
en numérotant 1/3, 2/3 etc
est ce réalisable à votre avis ?

MERCIII je ne le dirais jamais assez
 

Pièces jointes

Salut,
Une idée :
VB:
Sub mlkj()
Application.ScreenUpdating = False
Set c = Sheets("commande")
Set r = Sheets("repart")
ligne = 2
der = c.Range("a" & Rows.Count).End(xlUp).Row
For i = 2 To der
    nb = c.Range("o" & i)
    c.Range("a" & i & ":t" & i).Copy
    For k = 1 To nb
    r.Range("a" & ligne & ":t" & ligne).PasteSpecial
    r.Range("o" & ligne) = "'" & k & "/" & c.Range("o" & i)
    ligne = ligne + 1
    Next k
Next i
Application.CutCopyMode = False
End Sub
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
10
Affichages
841
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…