Transformer une formule en fonction

Bonjour

Question :

J'ai cette formule : ActiveCell.FormulaR1C1 = "=IF(SEARCH(""E6"",R[-13]C[-1]),""oui"",""on"")"

Je voudrais intégrer un then et un else

Donc faire quelque chose comme çà :

If SEARCH(""E6"",C2) then

'un code

else

'un autre code

end if

Et ben ça marche pas ....

Je crois qu'il faut passer par une fonction non ?

Merci de votre aide....

Bonjour

Essaie déjà avec ce code, plus académique :

ActiveCell.FormulaR1C1 = "=IF(SEARCH(""E6"",R[-13]C[-1]) =TRUE,""oui"",""non"")"

et tu auras peut-être un meilleur résultat.

Non ?

Bye !

Merci !!!!