VBA - fonction si

Bonjour,

Je tente de mettre une condition sur une cellule. Le code est le suivant.

Range("K20") = If (Application.VLookup((c.Value), fB.Range("A1:AD714"), 6, False) = "" Then "- " Else Application.VLookup((c.Value), fB.Range("A1:AD714"), 6, False))

En langage "excel", il se traduit par (nous sommes en cellule K20)

=Si(Recherchev(c.Value;Base($A$1:$AD:714);6;faux)="";"- ";Recherchev(c.Value;Base($A$1:$AD:714);6;faux))

Cependant, quand je souhaite lancer la macro, Visual Basic m'annonce une "erreur de syntaxe", et je n'arrive pas à voir où elle se trouve.

A noter que quand le lance le Vlookup sans le If, il trouve bien les bonnes données.

Merci d'avance pour votre aide.

Bonjour

Essaie ce code :

If Application.VLookup((c.Value), fB.Range("A1:AD714"), 6, False) = "" Then
    Range("K20") = "- "
Else
    Range("K20") = Application.VLookup((c.Value), fB.Range("A1:AD714"), 6, False)
End If

Bye !

Bonjour.

Merci, ça fonctionne beaucoup mieux !

Rechercher des sujets similaires à "vba fonction"