Discussion :

[vico68]

Bonjour
Je viens vous redemander de l'aide sur une VBA.
J'ai récupéré une macro que j'ai adapter à mon classeur mais quand je dégrise les cellules, les cellules de mes week-end et jours fériés ne se remettent pas à leurs couleur de départ comme le demande ma MFC.
J'ai eu beau chercher, je ne trouve pas de solutions alors s'il y aurait une âme charitable pour me donner un petit coup de pouce se ne serait pas de refus.
Fichier ci-joint:
En vous remerciant d'avance.
@+

[Menhir]

Je suppose que tu veux parler de la macro Dégriser() ?

Ton code est vraiment bizarre (c'est la première fois que je vois un For Next dans un With) mais si je comprends bien la ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If C.Interior.color = RGB(191, 191, 191) Then C.Interior.color = RGB(255, 255, 255)

Ca met en blanc les cellules grises.

Or, visiblement, les cellules de tes week-end dans Infirmerie et Incendie sont rouge ou magenta. Donc, elles sont éludées par le test.

[vico68]

Bonjour
Comme je l'ai dit le code n'es pas de moi, j'ai essayé de l'adapter à mes feuilles Infirmerie et Incendie.
C'est bien de la macro dégriser que je veux parler.
Donc ce que je souhaiterai c'est quand je dégrise les cellules celles-ci redeviennent comme vous l'avez dit rouge ou magenta sur toute la ligne comme le demande ma MFC.
A vous relire
@+

[Menhir]

Je ne comprends pas trop ta demande. Il faudrait que tu décrives plus précisément ce que tu souhaites.

Dans la ligne que j'ai citée, si tu enlèves la partie du "If" au "Then" (ces deux mots inclus) est-ce que ça fait ce que tu souhaites ?

[vico68]

Bonjour
En faite ce que je voudrais c'est que dans mes feuilles Incendie et Infirmerie les jours fériés et les week-end se remettent dans la couleur qui est demandée par ma MFC.
Ors quand je change de mois sur mes feuilles (il y a un menu déroulant dans les cellules mois) les jours fériés et les week-end qui ont étaient grisés le mois précèdent ne reviennent pas à la couleur demandé par la MFC, les cellules restent blanche.
Ci-joint le fichier sans la macro et sans modif:

[Menhir]

Si tu souhaites juste remettre à blanc cette colonne, la modification que je t'ai proposée devrait convenir.

Mais je pense qu'il faudrait que tu repenses ta procédure globalement. Tout ça devrait pouvoir se faire en une seule macro et non en deux comme actuellement. Mais pour ça, il faudrait établir clairement le mode de fonctionnement de ton tableau, ce que tu souhaites qu'il fasse.