Bonjour à tous,

dans une même feuille excel, j'execute plusieurs recherchev sur des tables matrices variable
voici le bout de mon code qui mon fonctionne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Dim ligfin As Long
ligfin = Sheets("Tps détaillés").Cells(Sheets("Tps détaillés").Columns(1).Cells.Count, 1).End(xlUp).Row
 
Range("B5").Formula = "=VLOOKUP(A5,'" & Sheets("Tps détaillés").Name & "'!$S$4:" & Range("Z" & ligfin).Address & ",8,FALSE)"
Range("B5").Select
Selection.AutoFill Destination:=Range("b5:b" & Range("A5").End(xlDown).Row), Type:=xlFillDefault
 
 
 
Range("C5").Formula = "=VLOOKUP(A5,'" & Sheets("Tps détaillés").Name & "'!$S$4:" & Range("AC" & ligfin).Address & ",9,FALSE)"
Range("C5").Select
Selection.AutoFill Destination:=Range("C5:C" & Range("A5").End(xlDown).Row), Type:=xlFillDefault
Tout va bien à partir de la
Cependant dans la colonne D, je dois faire une autre recherchev sur une autre feuille avec un range variable
j'ai donc déclaré ligfin sur l'autre feuille :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
ligfin = Sheets("Liste correspondance entité").Cells(Sheets("Liste correspondance entité").Columns(1).Cells.Count, 1).End(xlUp).Row
Range("D5").Formula = "=VLOOKUP(B5,'" & Sheets("Liste correspondance entité").Name & "'!$H7$:" & Range("I" & ligfin).Address & ",2,FALSE)"
Range("D5").Select
Selection.AutoFill Destination:=Range("d5:d" & Range("A5").End(xlDown).Row), Type:=xlFillDefault

mais la j'ai une erreur
pouvez vous m'aider?
merci de votre aide