obtenir valeur erreur dans cellule - VBA

[alexane]

Bonjour à tous

J'ai créer une procedure function que j'utilise dans mes feuilles de calcul Excel et je cherche le code qui me permettrait d'obtenir la valeur d'erreur #NA dans certains cas
Bien entendu je ne souhaite pas :

If condition x Then  MaFonction = "#NA"

Merci

 

[Hicsygrek]

Re : obtenir valeur erreur dans cellule - VBA

Bonjour Alexane ...

Si j'ai bien compris ton problème, entre ceci :

Range("TaFeuille!TaCellule").FormulaLocal = "=NA()"

Bonne journée, A+

 

[alexane]

Re : obtenir valeur erreur dans cellule - VBA

Bonjour merci de l'aide mais le problème c'est que je n'ai pas d'objet range où appliquer le FormulaLocal
j'ai un truc genre

function MaFonction(arg1,arg2)
if arg2 = "titi" then
MaFonction = arg1 * 10
elseif arg2 = "toto" then
MaFonction = arg1 * 100
else
MaFonction = "ERREUR"   'ici pbl : je veux que s'affiche #NA en resultat de fct
end if

Ensuite dans la feuille excel, je saisis ma fonction :
=MaFonction(200,"toto")
et quand si je saisis =MaFonction(200,"momo")
j'aimerais que s'affiche le code erreur traditionnelle #NA