Problème de range non respecté sur une macro

Bonjour,

Je cherche à coder une macro qui me permet de calculer un nombre de fois où un scénario se réalise dans une plage de plusieurs jours. Cependant lorsque je fais tourner ma macro elle ne prend en compte les calculs que sur une journée.
La formule fonctionne, le seul problèm que je rencontre est que la macro s'arrète sur une journée.

Je souhaiterais savoir si vous avez des conseils afin de résoudre ce problème ?

Je vous transmets le documents que j’ai déjà réalisé avec le code.

Merci de votre aide !

Bonjour

A la fin de la macro tu as

        Range("NB_Jours") = ref_Jourligne

mais quand et où fait tu modifier NB_Jours?

A+ François

Je compte les jours présent dans mon historique avec cette ligne

If Histo.Cells(Ligne, 1) - Int(Histo.Cells(Ligne, 1)) = DebutJ Then
Cpt_NbJ = Cpt_NbJ + 1
ref_Jourligne = Trim(CStr(Cpt_NbJ))
Histo.Cells(Ligne, 6) = ref_Jourligne

Puis à la fin du sub EcritureChangementJour je renvoie la donnée calculé sur Nb_Jours