Sujet Précédent Sujet Suivant

Nombre décimal a transformer en heures et min

Résolu/Fermé
-
 daniel -
Bonjour,
pouvez vous m'aider, je souhaite obtenir l'équivalence d'un nombre décimal exemple 1.25 (soit 1 heures et 25 centièmes) en résultat soit 1 heure et 15 minutes

merci de votre aide
isa
A voir également:

2 réponses

Réponse 1 / 2
Messages postés
8700
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
 1 197
Bonjour,
Je ne sait pas avec quel language tu travail mais en saisissant les décimales par ex 0.25 en %
faire 25 / 100 * 60 = 15 en minutes
A+

merci beaucoup

j vais pouvoir reussir mon dns de maths de 4eme(je comprenais pas)
-MERCI BEAUCOUP !!!!
Réponse 2 / 2
Messages postés
8700
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
 1 197
Bonjour,
En VB
A = 4,25
Heure = Fix(A)
Minute = ((A - heure) /100) * 60
Resultat = heure & ":" & minute

Quel rapidité, c'est vraiment apprécié.

Je viens de comprendre le principe pour transformer une donnée décimale en format heure, par contre, je suis présentement sur ACCESS.

Je vous explique ma situation:

Je calcule un champ qui donne la durée ([2009-03-11 23:38:23] - [2009-03-11 16:37:23]
--> le résultat dans ce cas ci me donne 7,016666667

1- Quelles sont les opérations dans ACCESS que je dois effectuer pour faire ce que vous m'avez expliqué plus haut?
2- Quand vous parlez de "Heure = Fix(A)", que signifie le Fix?


Encore une fois merci.
Ce forum est une révolution. Vive la magie du transfert de connaissance par l'internet
Messages postés
8700
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
 1 197
Beh ont fait ce qu'ont peu :)
Fix = la partie entière de la variable
le résultat.. 7,016666667
La partie entière est le nombre de jour,moi,année et la partie décimale c'est heure,minute,seconde
tu peu formater ta donnée en 
Dim Txt As String, Txt2 As String
a = CStr(7.016666667)
Txt = Format(a, "dd/mm/yyyy hh:mm:ss")
Txt2 = Day(Txt) & "/" & Month(Txt) - 1 & "/" & Year(Txt) - 1900 & " " _
& Hour(Txt) & ":" & Minute(Txt) & ":" & Second(Txt)
'ce qui donne 6 jour et 24 minute

Pour avoir la différence il faut enlever 1900 ans
Posez votre question

sur les mêmes thèmes