Bonjour,  
voila j'ai créé une fonction qui convertie les minutes en heures mais elle ne marche pas tout le temps
 
voila le code  
[quote]
 
'conversion des minutes  
 
     Dim a As Integer
     Dim e As String
     
     a = f.Cells(x, 54).Value
     If a Mod 60 = 0 Then
     e = a / 60 + f.Cells(x, 53).Value & "h"
     Else
     e = (Int(a / 60) + f.Cells(x, 53).Value) & "h" & Arrondi(Mid((a / 60), 2, 20) * 60)
     End If
     f.Cells(x, 55).Value = e
 
 
cette procedure marche si le nombre de minutes est inferieur a 600, si le nombre de minutes est superieur a 600, le resultat est de la forme : 14 h 117 minutes et moi j'aimerai bien 15h57 minutes  
 
merci d'avance

 
Elle est censée faire quoi, cette formule ? Parce qu'à mon avis, c'est un pb de math et non de VB.

guillaume7520, t'as jamais fait de math dans ta vie pour ne pas utiliser l'operateur "modulo" ?  

rappel de formule de 6ième :
 
soit T, le temps en minute :
H = T / 60
M = T mod 60
 
Si T est en seconde :
H = T / 3600
M = (T/60) mod 60
S = (T mod 3600) mod 60

A mon avis, Secondes sera toujours à zéro puisqu'on fournit un nombre de minutes...

Nettement plus simple:

Tu n'as plus qu'à remplacer le range [A1] par la cellule de ton choix.