[Résolu] Couleur en VBA

[Ayoros]

Bonjour à tous,

 

J'ai une question concernant l'attribution de couleur pour un graphe excel piloté par une macro. Par exemple pour attribuer une couleur je peux utiliser le code suivant :

With Charts("Chart1").ChartArea
.Interior.ColorIndex = 3
.Border.ColorIndex = 5
End With

Ce qui m'embête, c'est la définition de la couleur par "ColorIndex". N'est-il pas possible de définir de manière plus riche (pour avoir plus de couleur disponible) la couleur directement par son code héxadécimal qu'on pourrait récupérer d'après une palette personnalisée par exemple ?

 

En vous remerciant d'avance de vos réponses,

 

Ayoros.

Modifié le 5 juin 2007 par Ayoros

[guyguy59]

Bonjour

 

Si vous ne voulez pas passez par : ColorIndex, vous pouvez utiliser Color et lui donner une valeur en hexadécimal comme l'exemple qui suit :

 

With Charts("Chart1").ChartArea

.Interior.Color = &HFF& 'Rouge

.Border.Color = &H8000& 'Vert

End With

 

' &H800000& = Bleu

[Ayoros]

Bonjour

 

Si vous ne voulez pas passez par : ColorIndex, vous pouvez utiliser Color et lui donner une valeur en hexadécimal comme l'exemple qui suit :

 

With Charts("Chart1").ChartArea

.Interior.Color = &HFF& 'Rouge

.Border.Color = &H8000& 'Vert

End With

 

' &H800000& = Bleu

Bonsoir guyguy,

 

merci beaucoup pour la réponse, ainsi on peut rentrer le code d'une couleur qui ne correspond à aucune du colorindex classique ?

[sebdraluorg]

Salut,

 

Tu as aussi les constantes de couleurs de type long

 

VbRed

VbGreen

VbBlue

VbYellow

etc...

 

Utilisable avec la propriete Color et non ColorIndex qui est de type Byte il me semble...

 

++

[guyguy59]

Bonsoir

Oui on peut enter le code HexaDécimal d'une couleur, j'avais mis les couleurs de base, mais en connaissant le code couleur vous pouvez.

exemple :

Orange: &H80FF&

rose : &HFF00FF&

et bien d'autres.

[Dylav]

Petit détail, la couleur orange, ce serait plutôt &HFF8000&

... et ton rose est très fuchsia

[Ayoros]

Bonjour à tous,

 

merci pour votre aide, mon problème est en partie résolu.

Je dis bien en partie, car je sais maintenant que je peux utiliser du héxa, mais est-ce que ce code doit correspondre au ColorIndex classique (il y en a 56 je crois non ?) ou bien peut-on du coup mettre toutes les couleurs possibles en héxa ?

 

Ayoros.

 

PS: Dylav, le fuschia te va très bien

[manly]

Bonjour à tous

Je ne suis pas tout à fait dans ta réponse ayoros, mais j'ai découvert sur le site du zéro, un petit programme qui te permet de pointer la couleur sur n'importe laquelle affichée sur ton écran.

Je pense que cela peut t'aider car la pipette te donne le code hexa de la couleur survolée.

c'est ici."la boite à couleurs"

Et si je suis hors sujet, excuse moi.

Modifié le 5 juin 2007 par manly

[Dylav]

Bonjour, Ayoros et Manly,

 

Pour les couleurs, à partir du moment où VB accepte la notation hexadécimale, je pense que tu peux mettre n'importe quelle nuance de la palette complète, même si EXCEL lui-même ne te propose théoriquement que 40 couleurs distinctes. En tout cas, cela vaut le coup d'essayer, ça t'ouvrira des horizons artistiques...

[sebdraluorg]

tu as une palette de 32bits donc y a de quoi faire je pense ^^

 

++