Bonjour Fabrice,
Avant de proposer une solution, on va commencer par commenter un peu ton code :
Sub Macro7()
'
' Macro7 Macro
'
'
Range("AC4").Select 'Tu as séléctionné AC4, l'enregistreur l'écrit donc "bêtement", pourtant VBA n'a pas besoin de "sélectionner" les éléments sur lesquels il travaille
ActiveWindow.SmallScroll Down:=-18 <-- Inutile, c'est l'enregistreur qui a écrit ça car tu as utilisé la barre de défilement au cours de l'enregistrement
Selection.AutoFill Destination:=Range("AC4:AC89"), Type:=xlFillDefault
Range("AC4:AC89").Select 'Inutile, car aucune action ne suit la sélection
ActiveWindow.SmallScroll Down:=-120 'Idem (défilement)
Range("AC2:AE2").Select 'Inutile car pas d'action non plus...
End Sub
Voilà donc la seule partie utile du code :
Sub EtendreFormules()
Range("AC4").AutoFill Destination:=Range("AC4:AC89"), Type:=xlFillDefault 'Pas de "sélection", on précise juste les plages de travail
End Sub