Macro pour etendre une formule

Bonjour,

J'ai eu beau chercher, je ne trouve pas de solution a mon probleme.
En effet, j'aimerai creer une macro qui pourrait etendre ma formule se trouvant dans la derniere cellule active de ma colonne B jusqu'a la derniere cellule active de ma colonne A.

pour cela j'ai deja :

Code:

---

1 2 3

Range("C65536").End(xlUp).Offset(1, 0).Select ActiveCell.FormulaR1C1 = _ "=IFERROR(VLOOKUP(RC[-2],'Rapid 02'!C[-2]:C,3,FALSE),"""")"

---

mais je ne sais pas comment etendre cette formule jusqu'en bas.

Si je fais cela :

Code:

---

Range("C597").AutoFill Range("C597:C" & Range("A65536").End(xlUp).Row)

---

Cela fonctionne, mais chaque mois la ligne varie.

Quelqu'un aurait il une solution?

Merci par avance

Cdt

Sauvegarde ta dernière ligne de C dans une variable et réutilise la dans ta 2e formule :mrgreen:

Comment la réutiliser dans la 2e formule? Je n'arrive pas a coller ou etendre cette formule aux cellules en dessous.

Je suis encore debutant...

Merci