Access Addition d'heures

Utilises le format heure abrégée dans les paramètre du champ date/heure

Bonjour à tous

J'ai la réponse !!! mais avec VBA

Voici le code

'Permet de trouver un nombre d'heures > 24 :
Public Function EnHeure(ParTemps As Double, Optional ParSecondesAffichees As Boolean = False)
Dim VarJours As Long, VarHeures As Long, VarMinutes As Long, VarSecondes As Long
VarJours = Int(ParTemps)
ParTemps = (ParTemps - VarJours) * 86400 'nombre de secondes
VarSecondes = ParTemps Mod 60
ParTemps = ParTemps - VarSecondes
VarMinutes = (ParTemps Mod 3600) / 60 ' Minutes
ParTemps = ParTemps - VarMinutes * 60
VarHeures = (ParTemps Mod 86400) / 3600 ' Heures
VarHeures = VarHeures + VarJours * 24
If IsMissing(ParSecondesAffichees) Or ParSecondesAffichees = True Then
EnHeure = VarHeures & ":" & Format(VarMinutes, "00") & ":" & Format(VarSecondes, "00")
Else
EnHeure = VarHeures & ":" & Format(VarMinutes, "00")
End If
End Function

Il faut convertir la résultante de la somme (nombre réel) au format datetime. Ensuite, on choisit le format dans lequel on veut afficher hh:mm:ss ou hh:mm.

SELECT x, Format(CDate(Sum([Heures])),"hh:mm")
FROM table
GROUP BY x

où x = champ sur lequel on veut grouper

Bonjour,
Voici un lien qui pourra vous aider les personnes comme moi qui chercher une réponse.
http://www.info-3000.com/access/heureplus24/heureplus24.php

moi je veut additionner un chammp 1 et un champ 2 et stocker le résultat en champ 2 comment on fait

Bonjour,

J'a le même problème concernant les formats des heures. 20h + 20h =40 H. Comment fait on pour avoir les 40h ?
le format H entre crochet ne marche pas pour Access, mas pour Excel. Avez vous une autre solution ?

Merci
:o)

bonjour
ça marche pa :s c'est-à-dire ?

Qu'est-ce qui ne fonctionne pas ? Le format [h]:mm pour dépasser 24 heures ?

Bonjour,
ça marche pa :s

merci pour ton aide bonne journée

bonjour

c'est le format de ton champ qu'il faut modifier :
il faut mettre [h]:mm pour dépasser les 24 h
sinon avec hh:mm
tu n'a que les heures comprise dans les 24 heures.