Bonjour,
Modifie ta macro comme ceci :
Range("E10").Value = Application.WorksheetFunction.Subtotal(9, Range("B:B"))
Par contre, il faut cliquer dans n'importe quelle cellule afin de valider le résultat.
N'étant pas une pro du VBA, je ne sais pas faire le code pour cette validation.
J'en appelle aux experts pour le modifier.
Edit : le plus simple est que tu inscrives en E10 =SOUS.TOTAL(9;B:B)
plus besoin de macro
Amicalement
Nad