Discussion :

[bnisaid]

j'ai un problème si comment en peut conversion un Durée centièmes vers un format "hh:mm"
voila mon code source :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
sub calcul()
dim heurMax as integer
dim minMax as integer
dim DureeTotal as integer
dim DureeUtiliser as Integer
dim Result as integer
 
heurMax = 2 'Heure
minMax = 30 'Minute
DureeUtiliser = 120 'Durée Utiliser
 
DureeTotal = (heurMax * 60) + minMax '= 150
Result = (DureeTotal - DureeUtiliser) / 60 '=0,5
'il faut affichier en format "HH:MM" 
'exemple Result = "00:30"
'Merci d'avoir un code simple 
'HELP ME S.V.P !!!
'en fin Pardon pour mon mauvaise langue Français 
 
end sub

[Vld44]

format(0.5/24,"HH:MM")

[avigeilpro]

Il me semble que l'on peut aussi utiliser CDate ou CTime, non ?

[Vld44]

résolu !!! un admin peut le mettre ? Il m'a remercié en pv je suppose que ça veut dire que le problème est clos.