Copier couleur suivant valeurs

Re-bonjour,
Voici un fichier où j'aimerais, via macro, copier les cellules vertes de la feuil1 sur la feuil2 en se servant de la valeur de la cellule.
Merci pour votre aide et à Philippe qui m'a déjà bien fait avancer dans mon projet (voir autre post)
Famu.