Discussion :

[Olivierporcinet]

Bonjour,

Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If c.Font.Color = vbRed Then Rows(c.Row).Hidden = False

autre solution :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If c.Font.Color = 255 Then Rows(c.Row).Hidden = False

Le problème :

Dans la colonne "B", j'ai une liste déroulante avec une MFC, afin que lors d'une sélection, une info s'affiche en rouge (police de caractère).

Lorsque je veux afficher les lignes, celles avec la MFC ne s'affichent pas.

Des idées ?

Merci

[Franc]

Bonjour,
Lorsque vous utilisez une MFC pour changer la couleur de la police en rouge, cela ne modifie pas la propriété Font.Color de la cellule. Par conséquent, votre code VBA ne détecte pas le changement de couleur.
Une solution possible serait d’utiliser la même condition dans votre code VBA que celle que vous avez utilisée pour votre MFC. Par exemple, si votre MFC est définie pour colorer en rouge les cellules dont la valeur est “Oui”, vous pouvez utiliser ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If c.Value = "Oui" Then Rows(c.Row).Hidden = False

[Olivierporcinet]

Un grand merci.

Bonne journée

[laurent_ott]

Bonjour,

Pour connaitre la couleur de la police de caractère affectée par une mise en forme conditionnelle il faut utiliser :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(y, x).DisplayFormat.Font.Color

au lieu de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(y, x).Font.Color

idem pour la couleur de fond avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(y, x).DisplayFormat.Interior.color

Cordialement.

[Olivierporcinet]

Merci