Remplir une colonne sous condition

Bonjour,
J'importe un fichier txt sous xls et j'ai des opérations à faire avant de tracer des courbes
j'ai fait une macro mais j'ai une erreur au niveau de la recopie de ma condition

Range("B5").Select
ActiveCell.FormulaR1C1 = "=IF(RC[-1]>0.001,RC[-1],0)" ' exp B1=A1 si A1>0.001 sinon 0
Range("B5").Select
l = Cells.SpecialCells(xlCellTypeLastCell).Row
Selection.AutoFill Destination:=Range("B5:Bl"), Type:=xlFillDefault
' pour recopier cette condition das les autres cellules





Je voudrais juste recopier ma condition mise dans B5 dans toute ma colonne ( l est le nombre maximale de lignes qui dépend de mon fichier .txt)
j'ai l'erreur 1004 qui me dit que mon Autofill a échoué

Quelqu'un pourrait me dire ce qui ne va pas dans mon code ou comment réecrire cette condition

Merci beaucoup pour vos réponses