Vlookup problème

Bonjour,

qui peut m'aider à transposer cette formule en vba :

=SI(SI(G10<>"";RECHERCHEV(G10;Profs!A1:E43;5;FAUX))=X18;"X";"")

J'ai essaye ceci mais cela ne fonctionne pas

If .Range("G10").Value <> "" Then If WorksheetFunction.VLookup(.Range("G10").Value, Sheets("Profs").Range("A1:C43"), 5, False) = .Range("X18").value Then .Range("Y18") = "X"

Merci d'avance...

Oli

Bonjour,

Votre syntaxe est bonne, à un détail près, votre plage source diffère entre la formule Excel et VBA :

Profs!A1:E43 n'est pas identique à Sheets("Profs").Range("A1:C43")

Comme votre fonction RECHERCHEV doit renvoyer le 5 ème élément (colonne E) de votre tableau, et que la plage indiquée dans VBA n'en contient que 3, ça pose forcément problème !

Bonjour Pedro22,

je te remercie pour ton aide....je suis pas bien réveiller....cela fonctionne...

Merci Beaucoup

thespeedy20 a écrit :

Bonjour Pedro22,

je te remercie pour ton aide....je suis pas bien réveiller....cela fonctionne...

Merci Beaucoup

ça arrive à tout le monde !