VBA version Compliqué

http://www.cijoint.fr/cjlink.php?file=cj201106/cijSqznFbA.xls
J'ai essayé de poser le problème autrement
Si tu peux faire quelque chose
Merci

Désolé d'insister mais ça ne règle pas tout...
La différence dont je te parlais, elle n'apparaît pas
En tout cas tu m'as appris une nouvelle fonction qui va m'être bien utile
Merci

Re

sans VBA
=SI(MOIS(I4)>MOIS(H4);FIN.MOIS(H4;0)-H4;I4-H4) pour le mois de H4