MFC prenant en compte d'autres colonnes

Bonjour à tous.

Merci de m’aider à trouver la solution sur le tableau joint.

Mon problème se trouve à de deux niveaux j’espère.

Avec votre indulgence, est-il possible d’appliquer des formules conditionnelles en prenant en compte une autre colonne ?

Si oui

Sur ce tableau de planning de surveillance d’une compagnie aérienne, je voudrais que si je mets dans la colonne "Observations", cellule I3 les appréciations suivantes, que la cellule H3 de la colonne "Statut" soit rempli des couleurs ci-après :

"A venir" couleur grise ;

"En cours d’exécution" couleur jaune ;

"Exécuter" couleur verte ;

"Non exécuter" couleur rouge ;

"Dans moins d’une semaine" couleur orange.

Si non, à l’aide de la colonne et peut-être date et le code vba, peut-on avoir le même résultat. Voir le fichier joint.

Merci pour votre aide

31planning.zip (9.99 Ko)

Bonjour.

Par MFC, voici le fichier tel que j'ai compris.

Je me suis permis de rajouter une liste déroulante pour être sur d'avoir les observation correctement orthographiées ou sans faute de frappe. A enlever au besoin.

Bravo!

Merci. C'est formidable.

En regardant le fichier, je comprends que sous la commande Mise en forme conditionnelle du groupe Style, vous avez choisi l'option Gérer les règles. Mais c'est la formule que je ne comprends pas. Pouvez-vous me donner l'explication SVP?

N'y a t-il pas un autre moyen? en utilisant un code VBA par exemple?

Merci encore

Bonjour

Code feuil1

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("I2:I16")) Is Nothing Then
If Target.Value = "A venir" Then
Target.Offset(, -1).Interior.ColorIndex = 16
ElseIf Target.Value = "En cours d'exécution" Then
Target.Offset(, -1).Interior.ColorIndex = 6
ElseIf Target.Value = "Exécuté" Then
Target.Offset(, -1).Interior.ColorIndex = 4
ElseIf Target.Value = "Non exécuté" Then
Target.Offset(, -1).Interior.ColorIndex = 3
ElseIf Target.Value = "Dans moins d'une semaine" Then
Target.Offset(, -1).Interior.ColorIndex = 45
End If
End If
End Sub

Re. Je suis sur mon portable (tel) mais on peut faire le même genre de macros que amadeus en mettant un select case pour optimiser. L'essentiel etant que ca fonctionne

Merci à vous tous qui m'aider et les autres sur ce forum.

Merci particulièrement à Amadéus qui m'apporte beaucoup d'aide.

Je réponds tardivement parce que j'étais en voyage et je ne disposais pas de connexion Internet.

J'essaie le code et je vous reviens si j'ai des problèmes.

Merci à tous

Rechercher des sujets similaires à "mfc prenant compte colonnes"