VBA : faire une somme sur une sélection de cellules

Coucou,

J'ai un tableau Excel actualisable, lié à une base Access, qui marche avec des filtres. Au-dessus, je mets des formules de type NBVAL, SOMME se rapportant à certaines colonnes de mon tableau.

:-| Ma problématique est que l'utilisation de filtres n'actualisent pas mes formules. J'ai donc opté pour du code qui sélectionne les cellules visibles sur une plage :

Range("H4:H65536").SpecialCells(xlCellTypeVisible).Select

Pour faire un compte, j'ai trouvé une solution, mais pour faire une somme ???
Comment effectuer la somme de valeurs d'une sélection de cellules qui peuvent être discontinues ?

Un exemple ça pourrait aider :-P !
Sur la plage H4:H10, je fais un filtre où ressortent les cellules H5, H6 et H9. Je voudrais uniquement la somme de ces cellules.

:-o Une idée peut être ??? Hein dites... Merci d'avance ! :-o