Fonction SI ESTERREUR en vba

peternewman007 · 21 Avril 2015

Bonjour,

Je souhaite transformer une fonction en vba.
Voici la fonction :

=SI(ESTERREUR(+AM1886/RECHERCHEV($A1886;$A$3847:$AP$3942;39;FAUX));0;+AM1886/RECHERCHEV($A1886;$A$3847:$AP$3942;39;FAUX))

Et voici mon essai en vba :

Code:

If IsError(Cells(target.Row, 39) / Application.WorksheetFunction.VLookup(Cells(target.Row, 1).Value, Range("A:AP"), 39, False).Value) Then
    Cells(target.Row, 41) = 0
Else
    Cells(target.Row, 41) = Cells(target.Row, 39) / Application.WorksheetFunction.VLookup(Cells(target.Row, 1).Value, Range("a:ap"), 39, False)
End If

Qu'est-ce qui cloche?

Merci d'avance,

Peter

peternewman007 · 23 Avril 2015

Re : Fonction SI ESTERREUR en vba

Pierrot,

Le code extrait fait partie d'une série de codes et donc le End Sub est bien plus bas ;-)

Ne fonctionne pas quand même

Pierrot93 · 23 Avril 2015

Re : Fonction SI ESTERREUR en vba

Re,

place le juste avant le "end sub"... feuil1 étant le codename de la feuille concernée...

peternewman007 · 23 Avril 2015

Re : Fonction SI ESTERREUR en vba

Pas de résultat

Pierrot93 · 23 Avril 2015

Re : Fonction SI ESTERREUR en vba

Re,

bah... comme ca sans pouvoir tester, perso pas d'autre idée...

Fonction SI ESTERREUR en vba

peternewman007

XLDnaute Nouveau

peternewman007

XLDnaute Nouveau

Pierrot93

XLDnaute Barbatruc

peternewman007

XLDnaute Nouveau

Pierrot93

XLDnaute Barbatruc

Discussions similaires