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

Copier ligne selon valeur dans une autre feuille

  • Initiateur de la discussion Initiateur de la discussion poussy67
  • Date de début Date de début

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 !

poussy67

XLDnaute Occasionnel
Bonjour le forum,

Après avoir chercher sur le forum une solution à mon problème sans résultat, je n'arrive pas à adapter la VBA a mon fichier. Je suis à la recherche d'une vba qui me permet de copier des lignes selon une valeur qui est dans la colonne ("C"). J'ai plusieurs feuilles nommé: QA, QE, QU, DE. Ces valeurs on les retrouves dans la colonne C de la feuille ("Data"). Comment peut on copier de la feuille ("Data") vers les feuilles qui correspondent à QE, QA, QU, DE.

Merci d'avance pour votre coup de pouce

ci joint un exemple

CDT Poussy67
 

Pièces jointes

Re : Copier ligne selon valeur dans une autre feuille

Est ce que ce code fait l'affaire
Code:
Dim Cible As String, Cell As Range
For Each Cell In Sheets("Data").Range("C2:" & Range("C2").End(xlDown).Address)
    Sheets("Data").Range("A" & Cell.Row & ":" & "J" & Cell.Row).Copy
    Cible = Cell.Value
    Sheets(Cible).Select
    Range("A" & ActiveCell.SpecialCells(xlLastCell).Row).End(xlUp).Offset(1, 0).Select
    Sheets(Cible).Paste
    Application.CutCopyMode = False
Next Cell
 
- 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

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…