Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2019 Problème de jour ouvré

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Bonjour le fil, jpmetge, sylvanu

Pareil que sylvanu, mais avec un tit bonus
VB:
Sub TestIII()
MsgBox JourSuivant(Date)
MsgBox JourSuivant(Date, 2)
MsgBox JourSuivant(Date, 4)
End Sub
Function JourSuivant(Jour As Date, Optional NBJ As Long = 1) As Date
JourSuivant = Application.WorkDay(Jour, NBJ)
End Function
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
264
Réponses
4
Affichages
427
Réponses
14
Affichages
228
Réponses
18
Affichages
334
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…