VBA - Évolution de la valeur cherchée par rapport à la ligne de la formule

Bonjour à tous,

J'espère que vous allez bien.

Columns("M:M").Select
    Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
    Range("M1").Select
    ActiveCell.FormulaR1C1 = "Names"
Dim DL As Integer
DL = Cells(Application.Rows.Count, "A").End(xlUp).Row
Range("M2").FormulaR1C1 = "=VLOOKUP(R2C4,EU!C1:C12,12,FALSE)"
Range("M2").AutoFill Destination:=Range("M2:M" & DL), Type:=xlFillDefault

Je voudrais que la valeur_cherchée de la formule VLOOKUP => R2C4 évolue par rapport à la ligne. J'ai un fichier de 20 000 lignes et la valeur cherchée est toujours $D$2.

La colonne de la valeur_cherchée est la colonne "D".

Comme c'est nouveau le VBA, pourriez-vous me donner un coup de pouce s'il vous plaît ?

Je vous remercie.

Bonsoir,

Teste ça sinon envoi ton fichier pour bien comprendre ton besoin.

Range("M2:M" & DL).FormulaR1C1 = "=IFERROR(VLOOKUP(RC4,EU!C1:C12,12,FALSE),"""")"

Bonjour Raja,

J'espère que tu vas bien.

Cela a fonctionné à merveille !

Je te remercie beaucoup pour ton aide, t'es génial !

Bonne journée.

Je marque le sujet comme résolu.