Formule sous total en VBA

bonjour

je cherche a insérer la formule sous total en vba

    Dim lig As Long
lig = Feuil9.Range("A65536").End(xlUp).Row 'n° de la derniere ligne pleine de la colonne A
.Range(lig, 5).FormulaLocal = "=SOUS.TOTAL(9;E3: lig)"

le code insérer est =SOUS.TOTAL(9;E3:E891 ) sachant que j'insère des lignes donc la ligne E891 passe a e892 ect...

d'où j'ai mis ma variable lig mais cela ne fonctionne pas

amicalement

Bonjour,

Essaie donc :

"=SOUS.TOTAL(9;E3:E" & lig & ")"

Mais pourquoi se casser la tête à utiliser VBA pour ça ! C'est plus rapide manuellement !

Cordialement.

merci bcp tout est parfait

amicalement