La colonne 2 du fichier Source possède le code référence
La colonne 3 du fichier Target possède le code combiné par la formule :
"TAR"+ code de référence


L'extrait suivant
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
With Workbooks(Source).Worksheets(OngletS)
 
    For i = 2 To .Range("A" & .Rows.Count).End(xlUp).Row
     Set rngC = Columns(2).Find(.Cells(i, 3), , , xlWhole)
permet de faire la recherche mais seulement pour les codes de mêmes caractéristiques.

à ne pas confondre avec
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
Set rngC = Columns(2).Find(."TAR"+Cells(i, 3), , , xlWhole)