Salut le forum
Le problème était existant sous Excel 2000 mais pas sous Excel 2003.
Es-tu certain d'être en 2003.... ?
Sinon avec une fonction personnalisée à mettre dans un module standard.
Public Function SousTotal(Plage As Range)
Dim Cellule As Range
Application.Volatile
For Each Cellule In Plage
If Rows(Cellule.Row).Hidden = False Then
SousTotal = SousTotal + Cellule.Value
End If
Next Cellule
End Function
Mode d'utlisation
=SousTotal(F6:F32)
Mytå