XL 2010 Ameliorer une formule

[polyteis]

Bonjour,

Avec l'assistant excel, j'ai concocté cette formule,
Sub etirer_formule()
Range("b9😱9").select
Application.cutcopymode=false
Selection.autofill destination:=range("b9😱50000")
Range("b9😱50000").select
Activesheet.calculate
End sub
A chaque mise a jour de la colonne A, je lance le bouton pour etirer ma formule.
Est il envisageable de parametrer dans ma formule le nombre de ligne a recalculer, en fonction de la derniere ligne de A

Merci pour vos retour

 

[vgendron]

Bonjour
il suffit de retrouver la dernière ligne non vide de la colonne A

Sub etirer_formule()
fin=range("A" &rows.count).end(xlup).row
Range("b9:D9").autofill destination:=range("b9:D" &fin")

Activesheet.calculate
End sub

 

[polyteis]

Bonjour,
La ligne Range ("b9 :O9").autofill destination : range("b9:O" &fin")
Passe en rouge

 

[polyteis]

Re ,
L'erreur vient des guillemet apres fin

 

[polyteis]

Je lance la fonction
Merci avant toute chose