Colorier cellules en fonction date SAM DIM

Re : Colorier cellules en fonction date SAM DIM

Bonjour manu,

pourquoi pas continuer avec les MFC ?
Ton fichier en retour,tu peux changer la date en C1, les couleurs suivront

à+
Philippe

Re : Colorier cellules en fonction date SAM DIM

Bonjour phlaurent55

oui en effet par mise en forme j y étais arrivé mais si je désire écraser la couleur je ne peux pas
je suis obligé de le faire en copier coller
par macro une fois qu elle s est déroulé je peux changer la couleur

A+

Re : Colorier cellules en fonction date SAM DIM

Bonsoir

j ai réaliser ( bricoler )cette macro
elle fonctionne mais si on peut l améliorer je suis preneur (lenteur de realisation )
il s agit de colorier en gris D a AE en suivant la date samedi et dimanche

Sub coloriage()

For Each c In Range( _
"B6:B36,B43:B70,B77:B107,B115:B144,B151:B181,B188:B217,B224:B254,B261:B291,B297:B326,B333:B363,B370:B399,B406:B436" _
)'selection des cellules
Range("D" & c.Row & ":ae" & c.Row).Select
Selection.Interior.Pattern = xlNone 'effacer les couleurs de D a AE

If Weekday(c.Value, 2) > 5 Then Range("D" & c.Row & ":ae" & c.Row).Interior.ColorIndex = 15' si date weekend met en gris
Next c
Range("D6").Select

End Sub

Merci d avance