Ignorer #N/A en VBA

Bonsoir à tous,

Je sollicite votre aide une fois de plus, après avoir cherché sans succès une solution.

Dans un tableau (a2:c18) j'ai renseigné des évènements dont les jours fériés de l'année, et je renvoi le signe X dès que le jour renseigné en C4 correspond au jour du tableau. Si pas de valeur trouvée excel renvoi #N/A ce qui fait buguer les calculs qui sont sur à la suite.

En bon excel cette formule met la cellule à "" si le contenu était #N/A.

=SI(ESTNA(RECHERCHEV(C4;Fériés!$A$2:$C$18;3;FAUX));"";(RECHERCHEV(C4;Fériés!$A$2:$C$18;3;FAUX)))

Mon problème est d'arriver à la même chose avec une fonction VBA, cette fonction mets "" si #N/A est trouvé mais renvoi "# valeur"

au lieu de renvoyer "X"

Function JF(C)

JF = Application.VLookup(C, Sheets("Fériés").Range("A2:C18"), 3, False)

If JF = CVErr(xlErrNA) Then

JF = ""

Else

JF = Application.VLookup(C, Sheets("Fériés").Range("A2:C18"), 3, False)

End If

End If

End Function

Cordialement

Bonsoir

Essayes cette fonction

Function JF(C)
  JF = Application.VLookup(C, Sheets("Fériés").Range("A2:C18"), 3, False)
  If IsError(JF) Then
    JF = ""
  End If
End Function

Merci encore une fois à Banzai 64 c'est effectivement le bon code

Cordialement

Rechercher des sujets similaires à "ignorer vba"