XL 2010 cellule colorée

[eastwick]

Bonjour à toutes et tous,

Dans le fichier joint, j'aimerais pas la formule Calculate en VBA colorer toutes les cellules contenant un H en vert et toutes les cellules contenant un B en bleu. Ces cellules doivent perdre leur couleur quand je supprimerai les caractères.

Merci beaucoup.

 

[eastwick]

c'est mieux avec le fichier

 

[natorp]

Bjr eastwick

Pourquoi ne pas utiliser la MFC ?

Cordialement, Gérard

 

[eastwick]

Pour ne pas flinguer les formules par les autres utilisateurs, je sais de quoi je parle !!! Sinon, oui la MFC fonctionne mais les profanes qui se servent du tableau font un peu n'importe quoi

 

[natorp]

Comme ça ?

Private Sub Worksheet_Calculate()
    Cells.Select
    Selection.FormatConditions.Delete
    Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
        Formula1:="=""h"""
    Selection.FormatConditions(1).Interior.ColorIndex = 43
    Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
        Formula1:="=""b"""
    Selection.FormatConditions(2).Interior.ColorIndex = 23

End Sub

Cordialement, Gérard

 

[natorp]

Avec le fichier

 

[eastwick]

Ca fonctionne nickel mais pourrais-je rester sur la cellule que je viens de remplir ou en dessous plutôt que de constater une sélection totale de la feuille à chaque fois que je tape b ou h ?
Merci !

 

[natorp]

Je ne comprends pas votre question
Vous tapez un "H" dans une cellule, vous faites "entrée", la couleur se met à jour et vous êtes dans la cellule du dessous

 

[eastwick]

Au temps pour moi, j'ai un conflit VBA car j'ai un autre code au-dessus... On peut compiler les 2 sachant qu'ils ont calculate en commun ?
Merci !

 

[eastwick]

Ou alors déposer votre code dans ThisWorkbook ? J'ai toujours demandé une formation VBA mais pas moyen, ça m'aurait évité de vous solliciter trop souvent.

 

[natorp]

Vous pouvez peut-être compiler, mais sans voir le code, je ne peux répondre ...