Bonjour à tous,
j'ai essayé tout ce que j'ai trouvé dans les post précédents mais je n'arrive pas à faire fonctionner un Vlookup.
J'ai une erreur 1004 : "impossible de lire la propriété Vlookup de la classe WorksheetFunction". J'ai regardé dans l'aide en ligne (il y a juste une vidéo), j'ai regardé ce que faisait l'enregisteur de macro, j'ai copié des bouts de code trouvés à gauche et à droite mais rien n'y fait.
Est-ce que quelqu'un pourrait avoir la gentillesse de jeter un oeil d'expert dessus ? Il n'y a aucune évidence pour un débutant et je boucle sans doute sur quelque chose de simple mais je ne m'en sors vraiment pas.
Merci beaucoup.
PS : j'ai mis des valeurs en dur pour le test.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Dim RelationClient As String Dim MoisSuivi As String Dim Plage As String FichierImport = "SFP_SSAAMM_Nom Projet_CODEARAMIS.xlsx" Workbooks(FichierImport).Sheets("KSF").Activate Workbooks(FichierImport).Sheets("KSF").Range("A9").Select MoisSuivi = "01/05/2011" Plage = "A9:B23" RelationClient = WorksheetFunction.VLookup(MoisSuivi, Range(Plage), 2, False)
Partager