Discussion :

[chton_77]

Bonjour,

j'aimerais pouvoir colorer, par la mise en forme conditionnelle, une cellule selon qu'elle contient une formule ou non.

Merci par avance

[Invité]

Bonjour Chton_77,

Vous pouvez le faire facilement avec :

Edition puis Atteindre puis cliquer sur le bouton "Cellules" et cocher "Formules".

Ensuite Format puis Cellule etc..

Vous pouvez aussi utiliser cette macro :

Code :

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

1
2
3
4
5
6
7
 
Selection.SpecialCells(xlCellTypeFormulas, 23).Select
    With Selection.Interior
        .ColorIndex = 43
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
    End With

Remplacer = 43 par le code de la couleur que vous désirez.

Amicalement.

[chton_77]

je remercie Jacques Jean pour sa réponse; j'ai entre temps trouvé une façon de faire qui me convient mieux sur le site d'Excelabo (astuce d'Alain Vallon):

création de la fonction "AVEC_FORMULE" dans un module du classeur excel

Code :

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

1
2
3
4
 
Function AVEC_FORMULE(cell) As Boolean
    AVEC_FORMULE = cell.HasFormula
End Function

puis son utilisation dans le code de la mise en forme conditionnelle :

Condition 1 : la formule est
Formule : AVEC_FORMULE(B4)