VBA Index des couleurs

Bonjour,

Une de mes macro colore une selection

Code:

---

1 2 3 4 5

With Selection.Interior .ColorIndex = 2 .Pattern = xlSolid .PatternColorIndex = xlAutomatic End With

---

Mon problème est que la valeur du ColorIndex semble correspondre à la position de la couleur dans la palette et que cette position n'est pas la même dans tous les classeurs.

Y-a-t-il un moyen pour avoir un code couleur valable partout?

Voir :
http://cjoint.com/data/ksoEcpkA5O.htm]
et
http://cjoint.com/data/ksoEIDw8Rl.htm


Merci

Bonjour,

utilise la propriété color :

Code:

---

ActiveCell.Interior.Color = RGB(0,255,0)

---

ou

Code:

---

ActiveCell.Interior.Color = vbRed

---

ok merci mais comment trouver en vba code couleur qui correspond aux couleurs qui m'intéressent? en cherchant dans les propriétés de la cellule qui contient cette couleur?

merci

la propriété color est en lecture/ecriture, il te suffit de la lire 8-)

Code:

---

Msgbox ActiveCell.Interior.Color

---

Merci

et pour les formats automatiques, ne peut on utiliser le code couleur? je veux dire dans la feuille elle même, pas en vba

quand je copie un format d'une feuille à l'autre j'ai souvent des surprises

merci

c'est qui est bizarre c'est que la formule me donne 32896 pour le blanc sur un classeur et 16777215 sur un autre

Bonjour à tous
bonjour jlgcf, JackOuYA

Recarde à cette adresse :

http://silkyroad.developpez.com/VBA/...CodesCouleurs/

tu y trouveras une explication de SilkyRoad qui te donnera des renseignements très intéressants sur les couleurs, ainsi qu'un fichier

Eric

Merci

J'en déduis que quelqu'un a dû personnaliser les couleurs de la palette (colorindex) pour qu'elle ne soit pas identique quand on crée un nouveau classeur mais je ne comprends pas pourquoi la valeur longue n'est pas la même partout.