XL 2016 Erreur 438 dans mon code

[ZAKAO]

Bonjour, comme indiqué dans mon titre j'ai une erreur qui apparait lorsque mon code doit chercher une valeur précise dans une base de donnée d'un autre classeur. Est-ce que quelqu'un peut me venir en aide ?

Dim Excel
Set Excel = CreateObject("Excel.Application")
Excel.Visible = True

Excel.Worksbooks.Open ("U:\DB Referencias y escandallo por piezas.xlsm")

Cells(new_row, 3) = Application.VLookup(Cells(new_row, 2), Workbooks("DB Referencias y escandallo por piezas.xlsm").Sheets(1).Range("B6:C6024"), 2, False)
Cells(new_row, 4) = Application.VLookup(Cells(new_row, 3), Sheets(1).Range("B6:C6024"), 2, False)
Cells(new_row, 5) = Application.VLookup(Cells(new_row, 2), Workbooks("DB Referencias y escandallo por piezas.xlsm").Sheets(1).Range("B6:G6024"), 6, False)

Merci d'avance

 

[ZAKAO]

J'ai trouvé mon erreur désolé de la perte de temps.