Griser cellules à l'intersection de valeurs de colonnes/lignes

[Quincy]

Bonjour à tous

Je cherche une solution pour griser les cellules qui sont à l'intersection de "S", "D" ou 'x" (lignes) et de "Matin" ou "Après-midi" (colonnes) dans mon onglet "Année 2009", sachant que les trois conditions d'une MFC ont déjà été utilisées.

Je vous joins mon fichier et espère que l'un d'entre vous aura une solution à mon problème.

Bien cordialement à tous.
Quincy

 

[pierrejean]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

bonjour Quincy

une solution: reprendre le format conditionnel de la colonne B en conservant les formules avec leurs references a la colonne B
voir C5 et D5

 

[Quincy]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour le forum, bonjour pierrejean,

Merci pierrejean pour ta réponse mais je n'arrive pas à adapter ta formule à l'ensemble du tableau.

Cordialement.
Quincy

 

[James007]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour le forum, bonjour pierrejean,

Merci pierrejean pour ta réponse mais je n'arrive pas à adapter ta formule à l'ensemble du tableau.

Cordialement.
Quincy

Bonjour,
Avec le signe $ ... tu obtiens la relativité $B5 que tu ajustes dans ton format condtionnel ... puis tu copies ce format sur les deux colonnes à droite ...

A +

 

[Quincy]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour James007,

Merci pour ton intervention mais le résultat ne me satisfait pas.
Je vais m'employer à trouver une solution plus automatisée.
Merci à vous deux.
Cordialement.

Quincy

 

[CIFACILE]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonsoir
un essai avec

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:AI33")) Is Nothing Then
With Target
Select Case .Value
Case Is = "S": i = 15
Case Is = "D": i = 15
Case Is = "x": i = 15
End Select
.Interior.ColorIndex = i
.Offset(, 2).Interior.ColorIndex = i
.Offset(, 1).Interior.ColorIndex = i
End With
End If
End Sub

On ne sait jamais...

 

[Quincy]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour le forum, bonfour CIFACILE

J'ai bien cru que ta formule allait marcher mais j'ai trop d'erreurs dans le fonctionnement de la macro. Elle provoque notamment des erreurs "incompatiblité de type" et surtout, et c'est étrange pour la case se mette en grisé il faut la survoler et si on clique dedans elle reprend son format initial. Surprenant !

Merci CIFACILE de t'être penché sur mon problème.
Cordialement.
Quincy

 

[Monique]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour,

à essayer

Formule de la MEFC (ligne 33) colonnes Matin et Après-midi

Condition 1 =Mdf

Condition 2 =(JOURSEM(DATE(An;ENT((COLONNE()-2)/3)+1;$A33);2)>5)+(DECALER(C33;0;-MOD(COLONNE()+1;3))="x")

Colonne des jours : Mefc à 2 conditions seulement

 

[Quincy]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour le forum, bonjour Monique,

Monique je viens de voir ta réponse et je te remercie. J'ai beaucoup de mal à comprendre ta formule dans la MFC d'autant plus que j'aurai aimé l'adapter à mon nouveau fichier puisque je lui ai adopté une nouvelle structure.
C'est dommage car j'ai cru comprendre que tu pouvais gérer les années suivantes de manière automatique et ce point précis m'intéressait particulièrement.
Je te remercie de t'être penchée sur mon problème.
Ci-joint mon nouveau fichier dans le cas ou quelqu'un puisse me l'améliorer.
Encore merci à tous.
Cordialement.
Quincy

 

[James007]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour Quincy,

Je te félicite pour l'esthétique de ton planning ...
Tu es à deux doigts du travail parfait en rajoutant deux, trois fonctions
Date() qui rendront ton planning totalement générique et automatique ...
A titre d'exemple :...
= date(année(maintenant()),1,1) te donne automatiquement le 1er janvier de l'année en cours ...

A +

 

[Quincy]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour James007

Merci pour tes compliments, quant à la formule DATE() je vais voir ce que je peux en tirer.
Cordialement.
Quincy

 

[Monique]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour,

Formules adaptées à ce fichier (plus qques trucs)
Il y a des mini explications en bas de feuille
On pourrait se passer des "x" mais je n'ai plus le temps, maintenant

 

[Quincy]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

re,

merci beaucoup Monique de m'avoir consacré du temps. Le résultat est bluffant. La gestion pluriannuelle est Ok, même pour le 29 février de 2012 (je n'y arrivais pas).
J'essaie de peaufiner le tout notamment la gestion des jours fériés et si j'arrive à quelque chose de cohérent je mettrai le fichier en ligne pour ceux d'entre vous qui ont suivi ce fil et qui seraient intérressés.
Merci à tous.

Quincy

 

[tbft]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour,

J'avais trouvé les formules qui donner les dates des jours fériés.
Je mets le fichier en ligne au cas ou...

 

[Quincy]

Re : Griser cellules à l'intersection de valeurs de colonnes/lignes

Bonjour tbft

Merci beaucoup, je prends au cas où, mais je suis en train de finaliser mon fichier grâce en fait au fil de Patrick Francis :

https://www.excel-downloads.com/threads/calcul-dans-un-calendrier-un-peu-special.116129/ et notamment l'intervention de BrunoM45 pour ces formules concernant la gestion des jours fériés.

A tout de suite, merci

Quincy