Je travaille en Excel 2003 avec une programmation VBA.
Lorsque qu'une cellule est colorié, je sais détecter sa coulour par
Interior.Colorindex.
Par contre, lorsque le coloriage est le résultat d'une mise en forme
conditionnelle, cela ne fonctionne plus.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichD
Bonjour,
Un petit exemple,
Une mise en forme conditionnelle dans la cellule B1 la condition : la valeur est égale à 1 le format : Intérieur de la cellule en couleur si la condition est vraie.
Pour récupérer la valeur "ColorIndex" de la couleur du fond de la cellule :
'------------------------------- Sub test()
Dim Fc As FormatCondition With Worksheets("Feuil1") Set Fc = .Range("B1").FormatConditions(1) End With MsgBox "L'index couleur est : " & Fc.Interior.ColorIndex
End Sub '-------------------------------
MichD -------------------------------------------- "MorMic" a écrit dans le message de groupe de discussion : 4defe9e6$0$14653$
Bonsoir au groupe,
Je travaille en Excel 2003 avec une programmation VBA. Lorsque qu'une cellule est colorié, je sais détecter sa coulour par Interior.Colorindex. Par contre, lorsque le coloriage est le résultat d'une mise en forme conditionnelle, cela ne fonctionne plus.
Y a-t'il un moyen en VBA de tester ces couleurs.
Merci de votre aide
Michel
Bonjour,
Un petit exemple,
Une mise en forme conditionnelle dans la cellule B1
la condition : la valeur est égale à 1
le format : Intérieur de la cellule en couleur si la condition est vraie.
Pour récupérer la valeur "ColorIndex" de la couleur du fond de la cellule :
'-------------------------------
Sub test()
Dim Fc As FormatCondition
With Worksheets("Feuil1")
Set Fc = .Range("B1").FormatConditions(1)
End With
MsgBox "L'index couleur est : " & Fc.Interior.ColorIndex
End Sub
'-------------------------------
MichD
--------------------------------------------
"MorMic" a écrit dans le message de groupe de discussion : 4defe9e6$0$14653$ba4acef3@reader.news.orange.fr...
Bonsoir au groupe,
Je travaille en Excel 2003 avec une programmation VBA.
Lorsque qu'une cellule est colorié, je sais détecter sa coulour par
Interior.Colorindex.
Par contre, lorsque le coloriage est le résultat d'une mise en forme
conditionnelle, cela ne fonctionne plus.
Une mise en forme conditionnelle dans la cellule B1 la condition : la valeur est égale à 1 le format : Intérieur de la cellule en couleur si la condition est vraie.
Pour récupérer la valeur "ColorIndex" de la couleur du fond de la cellule :
'------------------------------- Sub test()
Dim Fc As FormatCondition With Worksheets("Feuil1") Set Fc = .Range("B1").FormatConditions(1) End With MsgBox "L'index couleur est : " & Fc.Interior.ColorIndex
End Sub '-------------------------------
MichD -------------------------------------------- "MorMic" a écrit dans le message de groupe de discussion : 4defe9e6$0$14653$
Bonsoir au groupe,
Je travaille en Excel 2003 avec une programmation VBA. Lorsque qu'une cellule est colorié, je sais détecter sa coulour par Interior.Colorindex. Par contre, lorsque le coloriage est le résultat d'une mise en forme conditionnelle, cela ne fonctionne plus.