Renommer les nouvelles feuilles dès leur création en fonction du produit

Bonjour,

J'ai une macro qui exporte les données détaillées d'un TCD en fonction du code couleur des cellules de totaux. Par exemple, si une cellule de total est verte, la macro exporte les données détaillées de cette cellule dans une nouvelle feuille. Si j'ai deux cellules de totaux vertes, elle exporte vers deux feuilles distinctes les données détaillées.

J'aimerais donc que quand ma macro exporte les données, chaque feuille soit automatiquement renommée en fonction du produit auquel les données se réfèrent. Par exemple, si la macro exporte les données relatives au total des pommes, alors la feuille doit s'appeler Pommes.
Si la macro exporte les données pour les totaux de deux produits, chaque feuille doit porter le nom du produit. Ce nom est dans la première colonne de mon TCD.

Pourriez-vous m'aiguiller?

Merci!