Macro copie formule jusqu'en bas d'un tableau

Bonjour,

Edit Dan --> J'utilise votre solution --> https://forum.excel-pratique.com/viewtopic.php?f=2&t=17610&p=101223

Cependant, je souhaiterais remplacer le bout de code "=RC[-3]+(RC[-2]/10)" par : =SIERREUR(INDEX('Historique des mouvements'!I:I;EQUIV(MAX.SI.ENS('Historique des mouvements'!B:B;'Historique des mouvements'!E:E;[@N°Facture]);'Historique des mouvements'!B:B;););"")

Savez vous comment le traduire?

Merci d'avance pour votre aide!

Sub test()
'
' test Macro

    With Range("J13")
    .FormulaR1C1 = "=RC[-3]+(RC[-2]/10)"
    .AutoFill Destination:=Range("J13:J" & Range("J65536").End(xlUp).Row)
End With
End Sub

Solution trouvée en utilisant le code :

Sub test()
'
' test Macro
'

'
Dim DernLigne As Long

DernLigne = Range("J" & Rows.Count).End(xlUp).Row
Range("J13").AutoFill Destination:=Range("J13:J" & DernLigne)
End Sub

edit