Bonjourà tous,

Je cherche à réconcilier automatiquement des données issu de deux sources différentes pour s'assurer que tout va bien.

Je copie colle donc dans une feuille excel les données d'une source, j'ai déjà pu glisser dans ma macro, l'ajout d'une colonne avec formule dedans, retrait de ligne = 0, données triées dans un certain ordre en fonction de plusieurs critères.

J'aimerai maintenant pouvoir remplacer le contenu d'une cellule par une autre valeur.

Je m'explique dans une colonne j'ai des cellules contenant "EUR F/I" et "USD F/I" j'aimerai pouvoir changer le contenu de ces cellules par "EUR" et "USD" lorsque c'est necessaire.

J'ai essayé plusieurs codes :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
With Sheets("Apex")
       Sheets("Apex").cell.Value = Replace(Sheets("Apex").cell, "EUR F/I", "EUR", 1)
     Sheets("Apex").cell.Value = Replace(Sheets("Apex").cell, "USD F/I", "USD", 1)
 End With
Ou

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
 For Each cell In Range("Apex!N1").CurrentRegion.Columns
       Sheets("Apex").cell.Value = Replace(Sheets("Apex").cell, "EUR F/I", "EUR", 1)
   'Next cell
Mais ça ne fonctionne pas, est-ce un petit soucis dans mon code ou je ne suis pas du tout dans la bonne direction ?

Merci d'avance