Supprimer du texte en noir dans une cellule VBA

Bonjour,

j'aurai besoin de votre aide car je dois traiter un énorme fichier, ma tache est la suivante :

je dois effacer les caractères écrits en noir dans les cellules sachant qu'au sein d'une même cellule du texte est en noir et une autre partie en vert

Je me demandais s'il y avait pas une macro pour ça mais toutes les solutions que j'ai essaye jusqu'à maintenant ne fonctionne que pour la cellule et non pas pour la chaine de caractère.

J'espère que vous pourrez m'aider

Emilie