VBA Mise en forme conditionnelle

Résolu
Mokia34 Messages postés 25 Statut Membre -  
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

j'ai besoin d'aide pour de la mise en forme conditionnelle.
Je voudrais quelque chose en VBA pour créer un bouton d'activation de mise à jour par la suite. Mais je ne sais pas comment démarrer.

En fait j'aimerais que lorsque la date d'évènement 2 n'est pas indiquée :
-si : date de mise à jour (en A2 de l'onglet "date de mise à jour") - date de l'évènement 1 (onglet "tableau") < 8 alors rien
-si : date de mise à jour (en A2 de l'onglet "date de mise à jour") - date de l'évènement 1 (onglet "tableau") > 8 et <15 alors date de l'évènement 1 de couleur orange
-si : date de mise à jour (en A2 de l'onglet "date de mise à jour") - date de l'évènement 1 (onglet "tableau") > 8 alors date de l'évènement 1 de couleur rouge

J'aimerais aussi que l'intitulé de la colonne B ou C ("évènement1" ou "évènement2" ou "évènement3") se reporte en D mais que ce soit l'intitulé de la colonne de la date supérieure qui se reporte.

Si quelqu'un pouvait m'aider à écrire au moins une de mes conditions, ca serait super ! car etant nulle en VBA, je ne sais pas comment commencer...

Merci beaucoup

https://www.cjoint.com/?BLdwGnvgN3G

7 réponses

  1. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Salut,

    Je n'ai pas tout compris dans tes explications ou tu as dû te tromper dans certaines de tes énoncées.
    regardes si mes propositions se rapprochent de tes attentes, les dates des colonnes B, C et se colorisent en rouge si la différence est supérieure ou égale à 15, en orange supérieure ou égale à 8
    le report de l'événement en F

    https://www.cjoint.com/?BLeihHOBniL
    0
  2. Mokia34 Messages postés 25 Statut Membre 1
     
    merci beaucoup pour ton aide !! jai juste fait quelques modif et cest exactement ce que je voulais
    merci encore
    0
  3. Mokia34 Messages postés 25 Statut Membre 1
     
    en fait ya juste un truc qui marche pas
    jaurais voulu que l'intitulé de la colonne B ou C ou D ("évènement1" ou "évènement2" ou "évènement3") se reporte en D mais que ce soit l'intitulé de la colonne de la date qui est supérieure aux autres qui se reporte.

    Jai essayé de mettre dans la colonne "type" les résultats attendus.

    https://www.cjoint.com/?BLewubeBojE

    Peux tu maider stp ??
    0
  4. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    jaurais voulu que l'intitulé de la colonne B ou C ou D ("évènement1" ou "évènement2" ou "évènement3") se reporte en D

    Je pense que tu voulais dire se reporte en E

    de même en E11 je pense que tu voulais dire évènement 2

    contrôle ton fichier et confirme moi la bonne explication
    0
    1. Mokia34 Messages postés 25 Statut Membre 1
       
      oui cest ca
      excuse moi pour ces erreurs :s
      0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    En E2 colle cette formule

    =SI(ESTNA(INDEX($B$1:$D$1;EQUIV(SI(ET(B2="";C2="";D2="");"";MAX(B2:D2));B2:E2;0)));"";(INDEX($B$1:$D$1;EQUIV(SI(ET(B2="";C2="";D2="");"";MAX(B2:D2));B2:E2;0))))

    ou celle ci

    =SI(ESTERREUR(INDEX($B$1:$D$1;EQUIV(SI(ET(B2="";C2="";D2="");"";MAX(B2:D2));B2:E2;0)));"";INDEX($B$1:$D$1;EQUIV(SI(ET(B2="";C2="";D2="");"";MAX(B2:D2));B2:E2;0)))

    et incrémente vers le bas
    0
  7. Mokia34 Messages postés 25 Statut Membre 1
     
    comment as tu fait pour apprendre si bien l'utilisation des formules excel ? as tu un livre a me conseiller ?
    0
  8. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    Bien sur il y a des livres mais aussi des années de pratique et une réelle passion pour Excel et surtout envie de tester mes limites et celle d'Excel

    pour revenir à ta formule, si tu accepte le message d'erreur #N/A lorsque la ligne est vide ta formule peut se limiter à ça

    =INDEX($B$1:$D$1;EQUIV(SI(ET(B2="";C2="";D2="");"";MAX(B2:D2));B2:E2;0))
    0