256 couleurs vba excel 2007 Fermé

Question

Bonjour, a tous, forum

Configuration: Windows 7 / excel 2007

Je cherche svp une macro code vba pour afficher les 256 couleurs vba avec le code couleur 

correspondant en décimale.

je remercie d'avance, bonne journée a vous

Cordialement

lermite222 · Answer

Bonjour,
Il n'y a pas 256 couleurs prédéfinies mais 56.
Sub VoirCouleur()
Dim i As Integer
    With ActiveSheet
    For i = 1 To 56
        .Cells(i + 1, 1).Interior.ColorIndex = i
        .Cells(i + 1, 2) = i
    Next
    End With
End Sub
A+

lermite222 · Answer

Il y a des millions de couleurs, ça me parait difficile de toutes les affichés sur Excell :-)
Tu peu voir ces couleurs dans la palette couleurs personnalisée.
A+

dudulleray · Answer

Re 

je sais bien mais c'est le code qui m'interresse ou du moins quelque chose d'approchant

apres je me débrouille

merci pour ta reponse

A+

lermite222 · Answer

Jusqu'à présent je ne comprend pas bien ce que tu veux.
Si c'est pour avoir le code d'une couleur mettre une couleur personnalisée dans une cellule et en VBA saisir la valeur de la couleur de cette cellule.
Sinon détail un peu mieux

dudulleray · Answer

re

j'essai de faire un assistant couleur, dans premier temps pour voir comment ça marche et puis j'ai le temps et autant avoir un but

ensuite faire un programme qui va dans un userform et qui pourrai servir d'assistant tout comme les boites de dialogue disons un tout en un

si tu peux me contacter par mail je te montre 

moi je ne sais pas faire

sinon je te mets mon mail

A +

lermite222 · Answer

Surtout pas mettre ton mail sur le forum, je supprimerai ton message.
De toute façon j'ai compris ce que tu veux faire
Je pense que tu veux le réaliser toi-même, alors la marche à suivre
Un UserForm avec
1 PictureBox pour la palette
1 PictureBox pour voir la couleur
1 label pour afficher la valeur de la couleur

Sur le web tu recherche une palette de couleur. ou tu télécharge cette image (faut déziper)
L'image dans la PictureBox palette.

La Position absoluede la souris.

L'API getPixel à rechercher

Avec ça tu a tout ce qu'il faut. 
Le code doit se trouver dans le MouseMove de la palette.
Tu dis si tu "cale"
A+

dudulleray · Answer

Re 

Merci pour les infos

j'ai déja fait un userform avec des commandboutton pour les divers couleurs
et d'autres boutons de diverses sélection.

je souhaiterai juste un code qui me permettrai d'étendre un nuancier de couleur vba avec les codes décimals ou autres correpondants pour colorier mes commandboutton 

backcolor forecolor et autres

et mieux que les 56 couleurs courantes

Ensuite je pourrai paufiner mon programme

merci pour ton aide c'est sympa a toi

Ray