Copier cellules en fonction liste déroulante
Résolu
claire
-
claire -
claire -
Bonjour,
J'aurai besoin d'un coup de main!
Je suis en train de réaliser un fichier excel. Je voudrais créer une macro qui me permettrai de copier une plage de cellules d'une feuille de mon classeur en fonction de mon choix dans la liste déroulante.
Je m'explique :
- j'ai ma liste déroulante sur la feuille 1
- mes données à copier se trouvent dans les autres feuilles de mon classeur (16 au total)
- les noms contenu dans ma liste déroulante sont les mêmes que ceux de mes feuilles qui contiennent les cellules à coller
- les cellules copier (2 tableaux et 4 graphiques) doivent se coller en dessous de ma liste déroulante
- les cellules copier par noms selectionner se trouvent toutes dans la même feuille!
J'espère que vous arriverez à me comprendre!!!
merci pour votre aide!
J'aurai besoin d'un coup de main!
Je suis en train de réaliser un fichier excel. Je voudrais créer une macro qui me permettrai de copier une plage de cellules d'une feuille de mon classeur en fonction de mon choix dans la liste déroulante.
Je m'explique :
- j'ai ma liste déroulante sur la feuille 1
- mes données à copier se trouvent dans les autres feuilles de mon classeur (16 au total)
- les noms contenu dans ma liste déroulante sont les mêmes que ceux de mes feuilles qui contiennent les cellules à coller
- les cellules copier (2 tableaux et 4 graphiques) doivent se coller en dessous de ma liste déroulante
- les cellules copier par noms selectionner se trouvent toutes dans la même feuille!
J'espère que vous arriverez à me comprendre!!!
merci pour votre aide!
A voir également:
- Comment copier coller une liste déroulante sur excel
- Liste déroulante excel - Guide
- Excel liste déroulante en cascade - Guide
- Historique copier coller - Guide
- Comment copier une vidéo youtube - Guide
- Copier coller pdf - Guide
2 réponses
Bonjour,
Voici donc le code hyper complexe à adapter :
pour adapter :
- Sheets("Feuil1") : "Feuil1" est le nom de la feuille ou est située votre liste déroulante
- Range("A2:E12") : représente les cellules "accueillant" les donénes copiées
- Sheets("Feuil1").Range("A1").Value : si votre liste déroulante est située Feuil1 cellule A1
- Range("B5:F15") : est la plage de cellule de chaque feuille contenant les données à copier
N'hésitez pas...
Voici donc le code hyper complexe à adapter :
Sub Importer_Selon_Liste()
Sheets("Feuil1").Range("A2:E12").Value = Sheets(Sheets("Feuil1").Range("A1").Value).Range("B5:F15").Value
End Sub
pour adapter :
- Sheets("Feuil1") : "Feuil1" est le nom de la feuille ou est située votre liste déroulante
- Range("A2:E12") : représente les cellules "accueillant" les donénes copiées
- Sheets("Feuil1").Range("A1").Value : si votre liste déroulante est située Feuil1 cellule A1
- Range("B5:F15") : est la plage de cellule de chaque feuille contenant les données à copier
N'hésitez pas...
Merci pour ta réponse !
par contre la macro ne marche pas!!! j'ai bien adapté la macro à mon classeur pourtant!
ce que je comprends pas dans ta formule c'est comment la macro sait ou elle doit aller chercher les infos en fonction du choix dans la liste.
Par exemple si dans ma liste je choisis Paul il faut qu'elle copie les cellules de la feuille nommé Paul.
Je ne sais pas si je suis bien claire!!!
par contre la macro ne marche pas!!! j'ai bien adapté la macro à mon classeur pourtant!
ce que je comprends pas dans ta formule c'est comment la macro sait ou elle doit aller chercher les infos en fonction du choix dans la liste.
Par exemple si dans ma liste je choisis Paul il faut qu'elle copie les cellules de la feuille nommé Paul.
Je ne sais pas si je suis bien claire!!!
Oui Claire, tu es claire...
- Range("B5:F15") : est la plage de cellule de chaque feuille contenant les données à copier
- Sheets(Sheets("Feuil1").Range("A1").Value) dans ce bout de code, Sheets("Feuil1").Range("A1").Value = contenu de la cellule A1 feuil1, là ou est en fait la liste déroulante... Si Feuil1 A1 contient Paul, Sheets(Sheets("Feuil1").Range("A1").Value) équivaut à Sheets("Paul") soit la feuille nommée Paul...
En cas de difficulté, nous joindre un fichier en utilisant https://www.cjoint.com/ ou http://www.cijoint.fr/ sans données confidentielles...
- Range("B5:F15") : est la plage de cellule de chaque feuille contenant les données à copier
- Sheets(Sheets("Feuil1").Range("A1").Value) dans ce bout de code, Sheets("Feuil1").Range("A1").Value = contenu de la cellule A1 feuil1, là ou est en fait la liste déroulante... Si Feuil1 A1 contient Paul, Sheets(Sheets("Feuil1").Range("A1").Value) équivaut à Sheets("Paul") soit la feuille nommée Paul...
En cas de difficulté, nous joindre un fichier en utilisant https://www.cjoint.com/ ou http://www.cijoint.fr/ sans données confidentielles...