Bonjour,
Comment expliquer:
D'abord qq info:
Si BM4 = rien, le formule fait rien
Si BM4 est différent de rien, la formule vérifie si BM4 = EUR
Si BM4 = EUR alors elle marque 1 dans la cellule ou se trouve la cette formule
Si BM4 est différent de EUR alors la formule recherche le texte inscrit dans la cellule BM4 dans la page Currencies colonne A et renvoi ce que se trouve dans la colonne C
Voila
La formule retranscrite en VBA donne:
ActiveCell.FormulaR1C1 = _
"=IF(R[3]C[64]="""","""", (IF(R[3]C[64]=""EUR"",""1"",VLOOKUP(R[3]C[64],Currencies!C:C[2],3,'FALSE'))))"
Bonne journée
@Christophe@