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

Résolu
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
...
Configuration: Windows XP
Office 2007

2 réponses

  1. Contributeur
    bonjour
    =INDIRECT("'"&A2&"'!B51")

    écrire guillemet-apostrophe-guillemet &A2& guillemet-apostrophe....
    0
    1. 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