mrocf no entiendo tu codigo desde el for each
pero funciona perfectamente!!!!!!!!!!!!! y creo que queda generalizado el contar los dias cuando hay fechas que se traslapan o no!!
Por otro lado creo este procedimiento deberia ser elevado a Funcion!!!! se puede??, es decir:
Código:
Function cuentadias(r as range)
cuenta días = Call Macro787
end function