XL 2010 Heure de travail

[Konte94]

Salut tout le monde, je vous en prie qui peut m'aider à écrire un programme vba qui me permettra de calculer la durée payée du travail d'un employé avec une pause obligatoire d'une heure qui s'étend de 12h:00 à 13h:00.
L'exercice est sur le fichier joint ci-dessous

 

[JHA]

Bonjour à tous,

Un essai par formule, en "F8"

=SI(JOURSEM(C8;2)<6;MAX(0;SI(D8>12/24;E8-MAX(13/24;D8);SI(E8<13/24;MIN(12/24;E8)-D8;SI(ET(D8<12/24;E8>13/24);(12/24-D8)+(E8-13/24);"-"))));"")

copier vers la droite et le bas

JHA

 

[Pounet95]

Bonjour tout le monde
J'arrive un peu tard pour un même résultat.
Je n'ai pas voulu faire une seule formule ( histoire de comprendre ) et ai donc mis un tableau que j'espère plus explicite.