'colonne AT
'comparer la colonne BB avec Paramètres!D73:E81
With Range("BB8:BB" & dl)
tablo = .Value
For i = 1 To UBound(tablo)
'[B]message d'erreur à la ligne ci-après[/B]
tablo(i, 1) = WorksheetFunction.VLookup(tablo(i, 1), Sheets("Paramètres").[D73:E81], 2)
'autres tentatives de recherchV
'tablo(i, 1) = WorksheetFunction.VLookup(tablo(i, 1), Sheets("Paramètres").[D73:E81], 2, False)
'Range("f" & i) = WorksheetFunction.VLookup(Range("f" & i), Range("a2:c10"), 2)
'Sheets("Paramètres").[D73:E81].Find(What:=tablo(i, 1)) ', LookIn:=xlValues, LookAt:=xlWhole, MatchCase:=True)
'WorksheetFunction.VLookup(tablo(i, 1).Value, Sheets("Paramètres").Range("D73:E81"), 2, "")
'Application.WorksheetFunction.VLookup(MyRange, path, 5, False)
' End If
Next
End With
With Range("AT8:AT" & dl): .Value = tablo: End With