Jours fériés

Bonjour

j'ai besoin d'aide, si qlq pourrait m'aider svp

Lors de la création d'un planning j'aimerais une fonction (si elle existe) qui puisse me me donner les jours fériés automatiquement sur plusieurs années.

actuellement j'ai que les weekend qui ne sont pas comptabilisé dans mon planning merci.

Voici le code:

'creation planning

With Application

.Calculation = xlManual

.CalculateBeforeSave = False

End With

With Sheets("Etude_1")

.Columns("AC:AAC").Delete Shift:=xlToLeft

End With

If Sheets("PARAMETER").Range("NBR_SEMAINE").Value > 2 Then

For I = 1 To Sheets("PARAMETER").Range("NBR_SEMAINE").Value - 2

With Sheets("Etude_1")

.Columns("R:X").Copy

.Columns("R:X").Insert Shift:=xlToRight

End With

Next I

End If

For Each MyCellFormDate In Worksheets("Etude_1").Range("SEMAINE_PLANNING")

If MyCellFormDate.Column = 11 Then

MyCellFormDate.Formula = "=DATE_DEBUT"

Else

MyCellFormDate.Formula = "=RC[-1]+1"

End If

Next MyCellFormDate

Bonjour,

Merci de joindre un fichier à ta demande et de préciser ce que tu souhaites…

Cdlt.

Bonjour

le fichier est trop volumineux je vous l'envoie par mail ou autres ?

Bonjour,

ci-joint un modèle de calendrier annuel avec les jours fériés en jaune et paramétrable par année/mois

Bonjour;

Merci je vais voir ça.

thev a écrit :

Bonjour,

ci-joint un modèle de calendrier annuel avec les jours fériés en jaune et paramétrable par année/mois

Bonjour,

Merci, mais je n'arrive pas a adapter ce calendrier a mon planning !! si vous pouvez m'aider ça serait super, je vous envoie le fichier par mail si possible.

Merciiiiii