Copier formule vers le bas

[cccoste]

Bonjour,
Je suis débutante en macros Excel.
j'ai une macro sous Excel qui copie une formule à toutes les lignes non vides d'une colonne.
Le code est :

ActiveCell.FormulaR1C1 = "=+RC[-1]"
Range("E2").Select
Selection.AutoFill Destination:=Range("E2:E1588")
Range("E2:E1588").Select

Sauf que le nombre de lignes peut varier. Je n'ai pas toujours "E2:E1588"
Comment faire pour que la plage de la colonne E s'arrête dès que la colonne D (qui a la source) est vide?

Merci de votre aide

 

[kjin]

Re : Copier formule vers le bas

Bonsoir,
Inutile de faire une recopie incrémentée...

Range("E2:E" & Range("D65000").End(xlUp).Row).FormulaR1C1 = "=+RC[-1]"

ou plus simple

Range("E2:E" & Range("D65000").End(xlUp).Row) = "=$D2"

A+
kjin