Vlookup Résolu

Question

Bonjour à tous,

J'aimerais faire un Vlookup en VB au sein d'une boucle Do Until.

Mon fichier excel a plusieurs sheets

Le vlook up sera sur la sheet appellée test

i est un compteur sur la feuille "test".

J'ai essayé la syntaxe suivante : 


Cells(i,8)= Application.WorksheetFunction.VLookup(Cells(i,3),Sheets("Input").Range("A:A","AO:AO"),3,False)

Cela ne fonctionne pas malheureusement. Je pense que c'est lié au second argument de la fonction...

Merci beaucoup pour votre aide.

f894009 · Answer

Bonjour,

exemple avec traitement erreur si non trouve:

Sub test1()    If Not IsError(Application.VLookup(Cells(i, 3), Sheets("Input").Range("A:C"), 3, False)) Then        y = Application.VLookup(Cells(i, 3), Sheets("Input").Range("A:C"), 3, False)    ElseIf Not IsError(VLookup(Cells(i, 3), Sheets("Input").Range("AO:AQ"), 3, False)) Then        y = Application.VLookup(Cells(i, 3), Sheets("Input").Range("AO:AQ"), 3, False)    Else        y = "Pas Trouvé"    End If    Cells(i, 8) = yEnd Sub

Marc · Answer

Merci beaucoup. 

Bonne journée

Vlookup

2 réponses

Discussions similaires

Newsletters