Réccupération de données d'après une liste

Résolu
Bolinette Messages postés 13 Statut Membre -  
Bolinette Messages postés 13 Statut Membre -
Bonjour,

J'ai pas mal avancé sur un projet avec VBA, mais il me reste un dernier problème majeur.

J'ai plusieurs feuilles Excel dans un classeur. Chaque feuille a le nom d'une personne.
Dans la première feuille de mon classeur, j'ai une liste de nom.

Est-il possible de mettre au point une macro qui me récupère les données d'une celulle ("B51" par exemple) dans les différentes feuilles du classeurs, et qu'elle me les colle en face du nom correspondant dans la liste de la première feuille.
...
Ainsi pour Monsieur "Gamma" ("A2"), aller à la feuille nommée "Gamma" est copier la cellule "B51" dans la première feuille dans la celulle B2
Pour Monsieur "Lambda" aller à la feuille nommée "Lambda" est copier la cellule dans la première feuille dans la cellule B3
...
A voir également:

2 réponses

michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
bonjour
=INDIRECT("'"&A2&"'!B51")

écrire guillemet-apostrophe-guillemet &A2& guillemet-apostrophe....
0
Bolinette Messages postés 13 Statut Membre
 
Merci, mais je pense que je m'étais mal exprimé.
Ce qu'il me fallait c'était réccupérer des données dans plusieurs feuilles en fonction du nom de la feuille et enfin de les rapatrier dans un tableau.
Merci quand même mais le bon code était :

For b = 5 To 12510
For a = 1 To Worksheets.Count
If Sheets(a).Name = Cells(b, 5) Then
Cells(b, 14).Value = Sheets(Sheets(a).Name).Range("D39").Value
End If
Next
Next

Ici on va chercher entre la ligne 5 à 12510 et parmis toutes mes feuilles, la feuille qui a le même nom que la celulle de la ligne b dans la colonne E (5) (de la feuille active) et on récupère la celulle D39 de cette feuille que l'on colle dans la celulle de la ligne b et colonne N (14) (de la feuille active)
(Voilà si ça peut aider quelqu'un...)

Bolimoche !
0