VBA Mise en forme conditionnelle

[Résolu/Fermé]
Signaler
Messages postés
24
Date d'inscription
mardi 16 octobre 2012
Statut
Membre
Dernière intervention
21 octobre 2013
-
Messages postés
17515
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
8 septembre 2021
-
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

Messages postés
17515
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
8 septembre 2021
4 713
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
Messages postés
24
Date d'inscription
mardi 16 octobre 2012
Statut
Membre
Dernière intervention
21 octobre 2013
1
merci beaucoup pour ton aide !! jai juste fait quelques modif et cest exactement ce que je voulais
merci encore
Messages postés
24
Date d'inscription
mardi 16 octobre 2012
Statut
Membre
Dernière intervention
21 octobre 2013
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 ??
Messages postés
17515
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
8 septembre 2021
4 713
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
Messages postés
24
Date d'inscription
mardi 16 octobre 2012
Statut
Membre
Dernière intervention
21 octobre 2013
1
oui cest ca
excuse moi pour ces erreurs :s
Messages postés
17515
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
8 septembre 2021
4 713
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
Messages postés
24
Date d'inscription
mardi 16 octobre 2012
Statut
Membre
Dernière intervention
21 octobre 2013
1
comment as tu fait pour apprendre si bien l'utilisation des formules excel ? as tu un livre a me conseiller ?
Messages postés
17515
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
8 septembre 2021
4 713
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))