Couleur date

cmdt Messages postés 12 Statut Membre -  
eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

J'ai commencé à faire un calendrier perpétuel pour le travail. Je travail sur les quarts de shift et je me suis servi de la mise en forme conditionnelle (les 3 niveaux).

Je veux entrer maintenant les dates des différentes fêtes en couleur. Ces fêtes sont des formules qui se trouve dans mon fichier et je voudrais quand je change d'année que celle-ci (la date) deviennent de couleur rouge.

Je ne sais comment faire, car comme je vous l'ai précisé ci-haut, j'ai utilisé toutes les formes conditionnelles qui étaient à ma disposition. Je crois que je devrais passer par la programmation; je ne sais pas comment cela fonctionne. J'ai déjà dans un passé très très lointain fait de la programmation en basic.

Pouvez-vous m'aider pour résoudre mon problème?

Je pourrais vous envoyer mon fichier si cela est nécessaire.

Espérant une réponse positive de votre part.

Je vous remercie à l'avance.

Jean-Guy

3 réponses

  1. Raymond PENTIER Messages postés 58210 Date d'inscription   Statut Contributeur Dernière intervention   17 480
     
    Tu peux profiter de cette occasion, et de l'approche des fêtes de fin d'année, pour remplacer ta version 2003 par la version 2007 (ou carrément 2010) : tu n'auras plus cette limitation à 3 conditions.
    0
  2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour tout le monde,

    Un exemple qui mêle différentes façons de mettre en couleur :
    Private Sub metEnCouleur()
        Dim c As Range
        Application.ScreenUpdating = False
        For Each c In Selection
        If Not IsDate(c.Value) Then Exit Sub
        If Day(c.Value) = 25 And Month(c.Value) = 12 Then
            ' couleur en dur
            c.Interior.ColorIndex = 6
        ElseIf Year(c.Value) <> Year(Date) Then
            'couleur récupérée sur une cellule
            c.Interior.ColorIndex = Worksheets("Feuil2").[A1].Interior.ColorIndex
        Else
            c.Interior.ColorIndex = xlNone
        End If
        Next c
        Application.ScreenUpdating = True
    End Sub


    Sélectionner la plage concernée et lancer la macro.
    Si tu as des MFC elles prendront le dessus sur la macro.

    eric
    0
    1. cmdt
       
      Bonjour,
      J'ai omis de préciser que mes dates de fêtes sont calculé et elles sont dans une certaines plage de cellules (onglet intitulé FÉRIIÉS et dans la plage suivante b5..b17).
      J'aimerais que le calendrier qui se trouve dans l'onglet ÉQUIPE retrouve pour tout le calendrier; dans l'onglet FÉRIÉS la plage (b5..b17).

      Le calendrier (onglet ÉQUIPE) est réparti comme suit:
      Janvier (b8..h13)
      Février (j8..p13)
      Mars (r8..x13)
      Avril (z8..af13)
      Mai (b17..h22)
      Juin (j17..p22)
      Juillet (r17..x22)
      Août (z17..af22)
      Septembre (b26..h31)
      Octobre (j26..p31)
      Novembre (r26..x31)
      Décembre (z26..af31)

      C'est la seule façon d'expliquer mon problème que j'ai trouvé pour vous expliquer la façon de comprendre les explications que vous m'avez donné. Comme je le mentionnais dans mon message de départ cela fait très très longtemps que j'ai fais de la programmation (en basic).

      J'ai compris partiellement les explications malgré tout.

      Espérant une autre réponse de votre part

      Merci pour tout

      Jean-Guy
      0
    2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      Bonjour,

      Tu peux déposer un classeur exemple avec les explication dessus sur cijoint.fr et coller ici le lien fourni.
      eric
      0
    3. cmdt Messages postés 12 Statut Membre
       
      Bonjour,
      Je ne sais pas si cela va fonctionné.

      voici le lien:
      http://www.cijoint.fr/cjlink.php?file=cj201010/cijavfIVae.xls

      ou

      http://www.cijoint.fr/cjlink.php?file=cj201010/cijKrvlybP.xls

      Je crois que le deuxième lien est le bon. C'est la première fois que j'utilise se genre de procédé.

      Merci pour tous.

      Jean-Guy
      0
  3. cmdt Messages postés 12 Statut Membre
     
    Bonjour,
    Ect-ce qu'il y a quelqu'un qui peut m'aider

    Merçi à l'avance

    cmdt
    0
    1. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      Bonsoir,

      J'ai regardé ton fichier, le pb c'est qu'il est très complexe avec des tables dans tous les coins.
      Autres problèmes :
      - 12 zones pour chaque mois donc faible régularité.
      - des nombres dans les cellules au lieu de dates
      - toutes tes MFC ne sont pas récupérables si tu complètes par des mises en forme par macro, elles prendront le dessus sur la macro.

      Réfléchi si les zones par mois sont vraiment nécessaires et si la zone par semaine avec toute l'année ne serait pas suffisante.
      Et si tu comptes introduire des macros autant tout faire par macro et le minimum par formule.

      En résumé il faudrait tout reprendre à zéro, la structure en 1er...

      eric
      0