Rechercher : dans
Par :

Différence entre deux heures sous Vba excel

Dernière réponse le 23 jun 2009 à 11:39:31 Akroma0, le 23 jun 2009 à 10:08:22 
 Signaler ce message aux modérateurs

Bonjour,

J'ai un petit soucis, je m'explique:

j'ai sous vba une fonction pour calculer le difference de jours entre deux dates.

 
Function evalDuration(startTime As Range, EndTime As Range)

evalDuration = WorksheetFunction.NetWorkDays(startTime.Value, EndTime.Value)

End Function


J'aimerai faire exactement la meme chose avec des heures le problème c'est que je ne trouve pas se qui pourrait pour remplacer NetWorkDays.

Si quelqun a des idées merci ,)
Configuration: Windows XP Internet Explorer 7.0
Excel 2007

1

 Mike-31, le 23 jun 2009 à 11:39:31

Salut,

Peut être ce code pour les heures

Function EcartDates(DateOuverture As Date, DateReception As Date)
EcartDates = DateDiff("h", DateOuverture, DateReception, vbMonday, vbFirstJan1)
End Function

et celui ci pour les lours

Function EcartDates(DateOuverture As Date, DateReception As Date)
EcartDates = DateDiff("d", DateOuverture, DateReception, vbMonday, vbFirstJan1)
End Function

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

Répondre à Mike-31