mise en forme conditionnelle et formules

[stikouhm]

Bonjour et noyeux joel !

je cherche à utiliser la mise en forme conditionnelle pour changer le fond d'une cellule si celle ci ne contient pas de formule mais uniquement des valeurs ...

y a un moyen de faire ça ?

Merci d'avance !

 

[michel_m]

Re : mise en forme conditionnelle et formules

Bonjour,

Par formule, je ne crois pas

par VBA

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.HasFormula Then
ActiveCell.Interior.ColorIndex = 6 ' jaune
End If
End Sub

a installer dans le module feuille concerné

 

[Bernard_XLD]

Re : mise en forme conditionnelle et formules

Bonjour stikouhm, Michel, le forum

sinon tu peux quand même utiliser les MFC en passant par une fonction personnalisée

Function Info_Formule(Cel_Test As Range) As Boolean
Info_Formule = Cel_Test.HasFormula
End Function

il ne te reste plus qu'à déclarer pour la MFC une condition de type formule
=info_formule(A1)

L' avantage est d'éviter une événementielle

Cordialement, A+

 

[michel_m]

Re : mise en forme conditionnelle et formules

Bonjour Yeahou

Très astucieux! j'achète!

Merci

 

[Bernard_XLD]

Re : mise en forme conditionnelle et formules

re

en fait il faut tester l'absence de formule et donc inverser la fonction, désolé

A+

Function Info_Formule(Cel_Test As Range) As Boolean
Info_Formule = Not Cel_Test.HasFormula
End Function

Ps: ça va, michel ?
y avait longtemps !!!

 

[stikouhm]

Re : mise en forme conditionnelle et formules

eheh !!

merci super astuce ça !!

et encore une victoire pour canard ! enfin yeahou ! donc super merci à toi !!