Discussion :

[DEBENS]

Bjr le forum.
Je veux écrire une formule avec pour seule condition la couleur du texte dans les cellules. Par exemple si A2;C2;G2 ont pour couleur de texte "vrai" ou "faux" en rouge alors que la reponse de la formule soit VRAI ou FAUX. merci pour vos solutions

[EricDgn]

Bonjour,

A mon avis cela ne peut être obtenu qu'à l'aide d'une fonction personnalisée dans ce genre:

Code :

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

1
2
3
4
5
6
7
8
9
10
Public Function TousRouge(c1 As Range, c2 As Range, c3 As Range) As Boolean
    TousRouge = False
    If c1.Font.ColorIndex = 3 Then              '--- 3 = rouge
        If c2.Font.ColorIndex = 3 Then
            If c3.Font.ColorIndex = 3 Then
                TousRouge = True
            End If
        End If
    End If
End Function

Cordialement.

[Alex020181]

Bonjour

Un complément; la récupération de la couleur par VBA ne tient pas compte de la mise en couleur appliquée par Excel suite aux mises en formes conditionnelles (MFC).
Si tes couleurs proviennent d'une MFC il faut recoder ses conditions.