Excel VBA : soustraire 3 jours ouvrés a date
Résolu
Eaheru
Messages postés
205
Statut
Membre
-
Eaheru Messages postés 205 Statut Membre -
Eaheru Messages postés 205 Statut Membre -
Bonjour,
Je cherche a effectuer une soustraction de 3 jours ouvrés a une date présente dans une cellule Excel.
J'ai pour le moment ecris :
Cells(Lig001, 22).Value = Cells(Lig001, 22).Value - 3
(c'est dans une boucle)
Mais bien évidement, le 3 correspond a des jours calendaires.
Sauriez vous comment soustraire des jours ouvrés svp ?
Je cherche a effectuer une soustraction de 3 jours ouvrés a une date présente dans une cellule Excel.
J'ai pour le moment ecris :
Cells(Lig001, 22).Value = Cells(Lig001, 22).Value - 3
(c'est dans une boucle)
Mais bien évidement, le 3 correspond a des jours calendaires.
Sauriez vous comment soustraire des jours ouvrés svp ?
A voir également:
- Excel VBA : soustraire 3 jours ouvrés a date
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
- Excel compter cellule couleur sans vba - Guide
1 réponse
J'ai trouvé ma réponse.
Peut être que ce sera utile à quelqu'un. Il suffit d'écrire :
Dim Marge as long
Marge = -3
Cells(Lig001, 22).Value = Application.WorksheetFunction.WorkDay(Cells(Lig001, 22).Value, Marge)
Et la colonne 22 de la ligne en cours (c'est dans une boucle) recevra la valeur suivnte : valeur de la colonne 22 de la ligne ne cours - 3 jours ouvrés.
Peut être que ce sera utile à quelqu'un. Il suffit d'écrire :
Dim Marge as long
Marge = -3
Cells(Lig001, 22).Value = Application.WorksheetFunction.WorkDay(Cells(Lig001, 22).Value, Marge)
Et la colonne 22 de la ligne en cours (c'est dans une boucle) recevra la valeur suivnte : valeur de la colonne 22 de la ligne ne cours - 3 jours ouvrés.