Couleur fond cellule

Bonjour a toutes et tous, forum

Avant de poster, je souhaite au forum, ainsi qu' a toutes et tous une très bonne année 2012 avec plein de santé.

Voila je souhaiterai connaitre le numéro de couleur de FOND d'une cellule active, j'ai le programme Palette des 56 couleurs mais pas pour VBA et trouver la bonne couleur, j'ai pas envi de relever ce défit.

Pas de fichier a joindre, je cherche un programme de test qui me renverrai ce N° ou comment fait t'on simplement ??????

Merci a vous et de votre temps, bonne après midi

Raymond

Salut le forum

Ceci

MsgBox ActiveCell.Interior.ColorIndex

Mytå

Bonjour Raymond et meilleurs voeux pour cette nouvelle année.

Essayez ceci :

Sub indexCouleur()
    MsgBox "Le n° de couleur de fond est : " & Range("C5").Interior.ColorIndex
End Sub

edit: vindieu quel vitesse Myta, pourtant je m'étais mis en mode turbo ^^ (d'ailleurs activecell est beaucoup mieux adapté)

Salut Mytâ, chrix

Merci pour vos réponses mais les codes différents ne donne pas le mème N° de couleur d'ailleurs il y aurai t'il un moyen

d'avoir plus précisément le bon N° de couleur svp

A plus tard merci

Raymond

Raymond,

Essayez le fichier joint.

Bonjour

Meilleurs Voeux

..et celui-ci

Cordialement

Re le forum

Ou cette ficelle : https://forum.excel-pratique.com/cours-astuces/couleurs-rgb-t21547.html

Mytå

merci a vous

la différence n'ai pas très importante sur une copie d'écran (paint)

voir fichier ci joint

sans doute a cause version d'excel sur la photo les verts sont indentiques (43) pourtant ???????

Merci a plus

Raymond

Salut a tous

merci de votre aide des liens et petit code, je devrai m'en sortir avec tout ca

bon c'est pas le tout, je vais regardé ca de près

Encore merci a vous et bonne année 2012

je mets en résolu ca me va bien les réponses merci

Bye Raymond