Addition jours ouvrés à une date [Résolu]

bonjour

ta date en A1, le nbre de jours ouvrés en B1

dans ton code:

date_fin= [workday(A1,B1)]

ou

nbre = 50
dep = CLng(Range("A1"))
date_fin2 = Evaluate("workday(" & dep & "," & nbre & ")")
MsgBox Format(date_fin2, "dd/mm/yy")

nota: peut-être qu'il faut que dans XL l'utilitaire d'analyse soit activé (outils-macros complémentaires)

Merci pour ta réponse mais il semble que je n'ai pas du faire ce qu'il faut car en résultat il me donne le 24/01/2054.
Pour plus de simplicité, je vous copie le programme que j'avais fait :

DateDébut = 0
nbrejours = 0
DateFin = 0

Sheets("temps formation").Select

DateDébut = Range("B2")
nbrejours = Range("D2").Value


DateFin = [workday(D2,B2)]

Cells(2, 3).Value = DateFin

Une autre question pour avoir le nombre de jours je divise mon nombre d'heures par 7 donc je vais avoir un nombre décimale de temps en temps. Cela posera-t il un problème? Si oui comment faire?

merci pour votre aide

n'aurais tu pas inversé les paramêmtres?
tu as écris
DateFin = [workday(D2,B2)]
au lieu de
DateFin = [workday(B2,D2)]
...

pour avoir le nombre de jours je divise mon nombre d'heures par 7
???? C'est sur quelle planète ? :-)

Hello
michel_m, 7 est le nombre d'heures par journée de formation (7h = 1j de formation ; 14h= 2j etc) ;)
du coup, va falloir gerer des demi journées ou on arrondi à la journée ?

Arrondir à la journée sera suffisant c'est juste une aide.

Merci bien

Je viens de finir d'essayer et cela marche super.

Merci beaucoup pour votre aide.

Excusez moi, je n'avais pas ma boule de Cristal !

Je vous laisse