Bonjour
cp4
C'est nickel, je te remercie ...
Juste, je voudrais renvoyer dans la cellule
la valeur du résultat de la formule et non la formule "
ActiveCell.FormulaR1C1 = _
"=IF(VALUE(LEFT(RC[1],2))<>33,33&RIGHT(RC[1],9),R1C[-4]&RIGHT(RC[1],9))"
lionel