Recherchev pour copier la couleur d'une cellule - Excel VBA

J'ai les tableaux suivants:

    A       B     C     D
  1 Bob     1     6     Football
  2 Nate    3     7     Baseball
  3 Silver  3     2     Baseball
  4 Box     7     1     Cycling

A           D
Bob         ?

Nate        ?

Je peux utiliser avec succès Recherchev pour remplir le ? cellules. Par exemple, Recherchev(A8,UN$1D$4,4,0).
Ce que je ne sais pas est d'obtenir Recherchev pour copier la couleur de trop. Il devrait y avoir une solution en VBA. J'espère votre aide.

  • La couleur dépend du contenu d'une cellule? Si oui, vous feriez mieux d'aller avec une mise en forme conditionnelle.
  • Le premier tableau, mise en forme conditionnelle. Le second tableau n'est pas, je veux copier la couleur exacte comme Recherchev ne avec des valeurs.
  • Je ne peux pas parce que exemple, c'est juste une simplification de la vraie tables. La première table est très importante, avec près de 100 lignes et la seconde table utilise juste un petit sous-ensemble des noms et de cette manière je ne peux utiliser la même mise en forme conditionnelle.
  • Je ne sais pas pourquoi c'est voté en bas. C'est en fait une très fréquentes question, sans réponse sensée "là-bas" sur l'internet.
InformationsquelleAutor CreamStat | 2014-03-03