Heure dans un label

[Ben]

Salut!

Cette fois G vraiment rien trouvé : J'ai un calcul d'heure qui se fait dans une feuille et que je récupère dans un label, en tant que total. Il me faut donc le format '37:00:25' vu que j'ai plus de 24 h et que je veux un nombre total d'heures. Ce qui est très facile à faire dans la feuille, mais quand je récupère la valeur dans mon label3, si je la récupère simplement par :

Label3.caption = cells(i,j).value

Ca me sort un chiffre Xl, et si je fais avec :

Private Sub CommandButton1_Click()

Sheets("Temps").Range("C2").Value = ListBox1.Value


Application.Run ("Décompte")

Label1.Caption = Sheets("Temps").Range("C1").Value

tpstot = Sheets("Temps").Cells(b + 6, 4)
Listbox3.Value = Format(tpstot, "[h]:mm:ss") 'l'intermédiaire "tpstot" _ n'est pas obligatoire

ListBox2.RowSource = "Présence"

MultiPage1.Value = 1


End Sub


là j'obtiens tjs le même résultat :

':12:00' ...va comprendre!!??

Si qqu'un pouvait m'aider ce serait vachement sympa!!! :'(

Je suis en train de p... un cable!!

@+, Ben

 

[Thierry]

Bonsoir Ben,

Faut jamais P... un cable en VBA... Sinon on vance pas !!

J'ai essayé aussi :
Temps = Sheets("Feuil1").Range("A1").Value
LabelTemps.Caption = Format(Temps, "[h]:mm:ss")

Rien à faire 12H et basta... (Qu'on me dise pas que le VBA est pas américain...)

Alors j'ai finté, étant donné que tu parles de récupérer un total dans un Label, je pense que ce n'est qu'à des fins d'affichage et plus de calcul ? (de toutes manières vu que tu as cette somme dans une cellule tu peux la récupérer pour des calculs sous une autre variable....

Donc Ben essaie çà, tu devrais être content :

Private Sub UserForm_Initialize()
TempsTotal = Sheets("Feuil1").Range("a1").Text
LabelTemps = TempsTotal
End Sub

Attention c'est du text affiché dans le Label, mais çà le fait style 37:00:25

Voili Voilà
@+Thierry

 

[Ben]

Un grand merci à toi Thierry! C'était pas compliqué mais il fallait y penser!!

Moi entre temps j'étais par une listbox, qui elle affiche bêtement ce qu'on lui dit, mais le problème c'est qu'elle ne s'aligne pas sur la grille de la même facon, donc c'était laid...merci encore!

@+, Ben

B)