Bonjour Leakim,
ta formule marche nickel j'ai l'ai mis dans un module
With WsCal.Cells(2, 1).Select
Range(Selection, Selection.End(xlDown)).Select
With Selection
.FormatConditions.Add Type:=xlExpression, Formula1:="=SOMMEPROD(($A2>=DVac)*($A2<=FVac))>0"
.FormatConditions(3).SetFirstPriority
With .FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 16764006
.TintAndShade = 0.4
End With
End With
End With
Et voilà, par contre j'ai également eu un bug sans doute du à la lecture des dates lu au format anglais.
Merci c'est parfait je valide