Vlookup
Résolu
Marc
-
Marc -
Marc -
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.
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.
2 réponses
-
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) = y
End Sub
