OVH Cloud OVH Cloud

Format Spécial pour les Heures

14 réponses
Avatar
bartez
Bonjour,

j'ai une macro qui comptabilise des heures et minutes.
Quand la variable est suppérieure à 24 heures, les jours sont incrémentés et
les heures retombent à zéro.

Existe-t-il un format pour avoir directement les heures sous la forme de
54:35 pour 54heures 35mn

Voici la ligne de code que j'utilise actuellement.
Total= Format(TimeValue(Durée1.Caption) + TimeValue(Durée2.Caption) "hh:mm")

Merci de votre aide
Philippe

4 réponses

1 2
Avatar
michdenis
Bonjour Modeste,


La réponse pourrait être plus simple que la problématique laisse sous-entendre!

Quand on multiplie par 1 ou divise par 1 le contenu d'une variable de type "Date", le résultat obtenu sera de type "Long" ou "Double
" selon la présence des heures, minutes, secondes ou pas. Cela ne s'applique pas pour l'addition ou soustraction, le résultat
affiche toujours un format date.

Si je multiplie chaque membre de l'addition par 1, le type de la variable A se double et non date.

A = (TimeValue("8:00:00") *1) + (TimeValue("20:59:51")*1) + (TimeValue("23:00:09")*1)
A = 2.166666667

Et dans ce cas, la fonction "Substitute" est justifiée et elle fonctionne très bien.
Sinon, la même fonction n'est pas applicable à cause de la non-concordance du type de données que la fonction Texte requiert.comme
premier argument :

Fonction : TEXTE(valeur;format_texte)
valeur : représente une valeur numérique, une formule dont le résultat est une valeur numérique ou une référence à une cellule
contenant une valeur numérique.

Cependant, on pourrait faire ceci pour qu' elle devienne utilisable : Mutiliplier par 1 le résultat obtenu par l'addition des temps

A = TimeValue("8:00:00") + TimeValue("20:59:51") + TimeValue("23:00:09")

MsgBox Evaluate("=TEXT(" & Application.Substitute(A * 1, ",", ".") & ",""[h]:mm:ss"")")

Voilà pour la petite histoire.

P.-S. Si quelqu'un sait pourquoi la multiplication et la division modifient le type "Date " en "Double " ou "Long "... mais pas
lorsque l'on utilise l'addition ou la soustraction, j'aimerais bien que cet individu se commette dans une petite explication.



Salutations!











"Modeste" a écrit dans le message de news:
Bonsour® Denis
Conclusion : Il y a quelque chose que je n'ai pas compris dans tes
explications...


tu as tout a fait raison, je pensais avoir l'explication de ces
comportements bizarre
mais aprés avoir fait divers tests j'en perds mon latin !!!
exemple :

Sub macro2()
Worksheets(1).Select
' calcul = variable locale à la macro
calcul = 6 * TimeValue("8:15:00")
[A1] = calcul
letexte$ = "6 fois 8h15 --> Regardez la cellule A1 : est-ce que A1 = calcul
?? "

MsgBox letexte$ & Chr(10) & "A1 : " & [A1] & Chr(10) & " calcul : " & calcul
End Sub

:-(((
--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
--
Feed Back
http://viadresse.com/?94912042

Avatar
Modeste
Bonsour®
michdenis wrote:
P.-S. Si quelqu'un sait pourquoi la multiplication et la division
modifient le type "Date " en "Double " ou "Long "... mais pas lorsque
l'on utilise l'addition ou la soustraction, j'aimerais bien que cet
individu se commette dans une petite explication.


;o)))
../..
le cartésianisme francophone pris en tenaille entre métaphysique et
pataphysique, ou égarements vers l'irrationnel....

on entend par rationalisme une direction générale de la pensée spéculative,
une conception déterminée du mode de génération de la connaissance humaine.
Cette conception consiste en ce que l'on se représente la raison comme la
principale source, disent les uns, comme l'unique source, disent les autres,
de tout véritable savoir.

à la conception rationaliste correspond une méthode philosophique
déterminée, qui fait dériver d'idées a priori les lois supérieures de la
réalité et les explications dernières par lesquelles les sciences même
doivent s'éclairer.

l'esprit doit s'appuyer sur l'observation, s'aider de la généralisation et
de l'induction, c.-à-d. de procédés logiques qu'a seule d'observation
légitime, fonder, par conséquent, sur les phénomènes eux-mêmes les vérités
qui paraissent dépasser de l'infini toute réalité phénoménale et rejeter
tout appel au raisonnement a priori, comme uniquement propre à égarer
l'entendement humain.
../..
;o)))


--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
--
Feed Back
http://viadresse.com/?94912042

Avatar
michdenis
Bonjour Modeste,

René Descartes au petit déjeuner... c'est un peu indigeste ! Tu penses donc tu est ! ;-)

Tu n'aurais pas l'adresse de son site internet...il faudra peut-être le dépoussièré ? ;-)

__________

Pour ce qui est de la petite explication, j'avais ceci :

Ajouter ou soustraire un nombre x de jour à une date, Excel sait très bien faire cela puisqu'il s'agit de se déplacer dans le
calendrier de x unités (1 jour = 1 unité) et d'afficher la date correspondante.

La multiplication ou la division suppose qu'Excel évalue d'abord le "résultat numérique " (une date = un nombre) de l'opération
mathématique. Pour évaluer ce "résultat ", il doit nécessairement transformer le format d'une date par sa valeur numérique (long ou
double) aux fins de l'opération. Le résultat est présenté à l'usager sous la forme "Long" ou "Double " et c'est à ce dernier qui
incombe la tâche de modifier le type de données (en date) au besoin.

_____________

Au grand penseur de ce forum d'infirmer ou de confirmer le tout en complétant les éléments manquants....


Salutations!





"Modeste" a écrit dans le message de news:
Bonsour®
michdenis wrote:
P.-S. Si quelqu'un sait pourquoi la multiplication et la division
modifient le type "Date " en "Double " ou "Long "... mais pas lorsque
l'on utilise l'addition ou la soustraction, j'aimerais bien que cet
individu se commette dans une petite explication.


;o)))
../..
le cartésianisme francophone pris en tenaille entre métaphysique et
pataphysique, ou égarements vers l'irrationnel....

on entend par rationalisme une direction générale de la pensée spéculative,
une conception déterminée du mode de génération de la connaissance humaine.
Cette conception consiste en ce que l'on se représente la raison comme la
principale source, disent les uns, comme l'unique source, disent les autres,
de tout véritable savoir.

à la conception rationaliste correspond une méthode philosophique
déterminée, qui fait dériver d'idées a priori les lois supérieures de la
réalité et les explications dernières par lesquelles les sciences même
doivent s'éclairer.

l'esprit doit s'appuyer sur l'observation, s'aider de la généralisation et
de l'induction, c.-à-d. de procédés logiques qu'a seule d'observation
légitime, fonder, par conséquent, sur les phénomènes eux-mêmes les vérités
qui paraissent dépasser de l'infini toute réalité phénoménale et rejeter
tout appel au raisonnement a priori, comme uniquement propre à égarer
l'entendement humain.
../..
;o)))


--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
--
Feed Back
http://viadresse.com/?94912042

Avatar
Modeste
Bonsour®
michdenis wrote:
Tu n'aurais pas l'adresse de son site internet...il faudra peut-être
le dépoussièré ? ;-)


à la vue des résultats Google, j'en viendrais à penser que les canadiens
sont les plus cartésiens des francophones ;o)))

http://ambafrance-ca.org/hyperlab/PEOPLE/descart.html

@+


--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
--
Feed Back
http://viadresse.com/?94912042

1 2