Discussion :

[Maxou 10]

Bonjour à tous,

J’ai fait une formule pour calculer mes heures sur des journées de 8h

Code formule :

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

=ENT(Z37/(1/24*8))&" jour(s) "&TEXTE(Z37-ENT(Z37/(1/24*8))*(1/24*8);"hh:mm")

J’aimerais mettre un h à la place des : et je n’y arrive pas....
Y a t’il une astuce à faire dans ma formule ?
Ou alors je suis de mettre un code vba remplace : par h dans a1 ? (Si c’est le cas, auriez-vous un code à me transmettre s’il vous plaît ?)

Je sèche et trouve rien....

Merci à tous et bonne soirée

[riton00]

Bonsoir,

Peut-être de cette façon, ou alors j'ai rien compris avec tes :

Code :

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

=ENT(Z37/(1/24*8))&" jour(s) "&TEXTE(Z37-ENT(Z37/(1/24*8))*(1/24*8);"hh")& " heures"

Slts

[Maxou 10]

Si c’est l’idée.... d’ailleurs j’ai mis à la suite de ton code &*MINUTE(.....,"mm")

Le problème c’est que moins de 10 minutes ça me met 1,2,....9
Et non 01,02,....,09,10,....59

[QuestVba]

Hello,
Comme je ne suis certain de bien visualiser tes données, voici une possibilité à adapter :

Code :

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

1
2
3
=SI(ENT(Z37/(1/24*8))=0;"";SI(ENT(Z37/(1/24*8))=1;ENT(Z37/(1/24*8))&" jour ";ENT(Z37/(1/24*8))&" jours "))
& " " & SI(TEXTE(Z37-ENT(Z37/(1/24*8))*(1/24*8);"hh")="00";"";SI(CNUM(TEXTE(Z37-ENT(Z37/(1/24*8))*(1/24*8);"hh"))=1;TEXTE(Z37-ENT(Z37/(1/24*8))*(1/24*8);"hh")&" heure";TEXTE(Z37-ENT(Z37/(1/24*8))*(1/24*8);"hh")&" heures"))
& " " & SI(MINUTE(Z37)=0;"";SI(MINUTE(Z37)=1;"0"&MINUTE(Z37)&" minute";SI(MINUTE(Z37)<10;"0"&MINUTE(Z37)&" minutes";MINUTE(Z37)&" minutes")))

[Philippe Tulliez]

Bonjour,

J’ai fait une formule pour calculer mes heures sur des journées de 8h

Pour calculer les heures prestées, je me contente de faire une simple soustraction et ensuite d'en faire la somme. Le tout formaté à l'aide d'un format nombre donc avant de vous donner une réponse pertinente, il serait intéressant de connaître la manière dont vous encodez vos heures
Faut-il vraiment comptabiliser des secondes pour des heures prestées ? Je peux le comprendre pour un sportif mais pour du travail ????

[riton00]

Code :

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

1
2
3
=SI(ENT(Z37/(1/24*8))=0;"";SI(ENT(Z37/(1/24*8))=1;ENT(Z37/(1/24*8))&" jour ";ENT(Z37/(1/24*8))&" jours "))
& " " & SI(TEXTE(Z37-ENT(Z37/(1/24*8))*(1/24*8);"hh")="00";"";SI(CNUM(TEXTE(Z37-ENT(Z37/(1/24*8))*(1/24*8);"hh"))=1;TEXTE(Z37-ENT(Z37/(1/24*8))*(1/24*8);"hh")&" heure";TEXTE(Z37-ENT(Z37/(1/24*8))*(1/24*8);"hh")&" heures"))
& " " & SI(MINUTE(Z37)=0;"";SI(MINUTE(Z37)=1;"0"&MINUTE(Z37)&" minute";SI(MINUTE(Z37)<10;"0"&MINUTE(Z37)&" minutes";MINUTE(Z37)&" minutes")))

Bonjour QuestVba

Bravo!!

Slts

[Maxou 10]

Salut,

Merci pour ton aide, je me suis énormément inspiré de ta formule et les idées de celle-ci pour arriver à mon résultat final...
Un grand merci pour ton aide, comme à chaque fois sur ce forum, il y a de vrai crack ! Un grand bravo
Du coup pour mieux me comprendre et plus simple pour moi, j'ai fait en 5 étapes. Je vous donne le dérouler pour les gens qui ont besoin :

Dans ma case Z37, j'ai la somme de toutes mes heures cumulées
Étapes 1 à 4 : écriture blanche pour ne pas voir....

Étape 1 : Formule en AC38

Code :

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

=ENT(Z37/(1/24*8))+Z37-ENT(Z37/(1/24*8))*(1/24*8)

Étape 2 : Les jours en U40

Code :

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

=SI(ENT(Z37/(1/24*8))=0;"";SI(ENT(Z37/(1/24*8))=1;ENT(Z37/(1/24*8))&" jour ";ENT(Z37/(1/24*8))&" jours "))

Étape 3 : Les heures en U41

Code :

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

=SI(TEXTE(AH37-ENT(AH37/(8/24))*(8/24);"hh")="00";" 00 H ";SI(AK38<1;TEXTE(AH37-ENT(AH37/(8/24))*(8/24);"hh")&" H ";TEXTE(AH37-ENT(AH37/(8/24))*(8/24);"hh")&"H"))

Étape 4 : Les minutes en U42

Code :

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

=SI(MINUTE(MOD(AH37;8/24))=0;"00";SI(MINUTE(MOD(AH37;8/24))<10;"0"&MINUTE(MOD(AH37;8/24));MINUTE(MOD(AH37;8/24))))

Étape 5 : Résultat en T37

Code :

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

=SI(AC38=0;"00 H 00";SI(ET(AC38<>ENT(AC38);AC38<1);U41&U42;SI(ET(AC38<>ENT(AC38);AC38>1);U40&U41&U42;U40)))

Et voila, bonne nuit à tous
Encore un grand merci