Utilisation de la fonction "IfError"

Bonsoir à toute la communauté.

Je voudrais retranscrire la formule que j'ai dans une cellule d'une feuille Excel : "=SIERREUR(CHERCHE($D$1;G28);"")" dans une macro mais si la fonction .search() fonctionne, ma ligne de commande ignore complètement la fonction .IfError() et je n'arrive pas à trouver la solution.

J'ai fouillé dans le forum mais à par l'utilisation de cette fonction avec "Formula=" je n'ai rien trouvé.

voici ma ligne de code :

essai = WorksheetFunction.IfError(WorksheetFunction.Search(ValeurCherche, TexteReference), """")

si "ValeurCherche" est trouvé, la variable essai = 1

mais si "ValeurCherche" n'est pas trouvé, je souhaiterais que essai soit égal à "" mais j'ai le message suivant :

image

Je pense ne pas avoir compris comment faire "l'empilement" des fonctions.

est-ce que quelqu'un peut m'aider ?

Merci d'avance et bonne soirée.

Bien cordialement

Raph

Bonjour Raph30,

Il y a beaucoup, mais alors beaucoup plus simple, si j'ai bien compris ton code

  Dim Essai As Variant
  Essai = InStr(1, Range("G28"), Range("D1"))
  If Essai = 0 Then Essai = ""

https://docs.microsoft.com/fr-fr/office/vba/language/reference/user-interface-help/instr-function

@+

Waouh !!!

Réponse expresse ! merci !

Je teste et je reviens vers toi;

Encore merci !

Merci BrunoM45, c'est ce que je voulais !

Je ne connaissais pas cette fonction et je crois que je n'ai pas tout compris justement dans l'utilisation des fonctions; mais je vais creuser davantage.

Bonne soirée.

Cordialement

Raph30

Re,

Perso, quand je peux me passer de "WorksheetFunction" je le fais

Une galère à gérer, plus lente et j'avais lu que c'était plus gourmand en ressource

@+

Rechercher des sujets similaires à "utilisation fonction iferror"