Microsoft 365 Formule pour ajouter heures à une date

=LET(
  add, LAMBDA(dt, rem, hols,
    IF(rem<=0, dt,
      LET(
        d, INT(dt),
        wd, WEEKDAY(d,2),                                  /* 1=Lundi … 7=Dimanche */
        wknd, (wd>=6),
        isHol, COUNTIF(hols, d)>0,
        dStart, d + TIME(7,30,0),
        dEnd, IF(wd=5, d + TIME(11,30,0), d + TIME(16,30,0)),
        cur, MAX(dt, dStart),
        /* si week-end/ferié ou après l'heure de fin : passe au prochain jour ouvré 07:30 */
        nextStart, WORKDAY.INTL(d,1,"0000011",hols) + TIME(7,30,0),
        cur2, IF(wknd + isHol + (cur>=dEnd), nextStart, cur),
        d2, INT(cur2),
        wd2, WEEKDAY(d2,2),
        d2End, IF(wd2=5, d2 + TIME(11,30,0), d2 + TIME(16,30,0)),
        dispo, (d2End - cur2) * 24,                        /* heures dispo aujourd’hui */
        take, MAX(0, MIN(rem, dispo)),
        add(IF(take=0, nextStart, cur2 + take/24), rem - take, hols)
      )
    )
  ),
 

[*]Utilisation dans une cellule : =ADD_WORK_HOURS_FR(A2; B2; $D$2:$D$20)