Workbooks(nom_classeur_macro).Sheets("INCIDENTS GLOBALE").Range("J" & i) = _
"=NB.JOURS.OUVRES(H" & i & ";I" & i & ";Ferie)*Duree -SI(MOD(H" & i & _
";1)>Fin;Duree;SI(MOD(H" & i & ";1)>=Debut;MOD(H" & i & ";1)-Debut))-SI(MOD(I" _
& i & ";1)<Debut;0;SI(MOD(I" & i & ";1)<Fin;Fin-MOD(I" & i & ";1)))"