Code couleur VBA

Bonjour à tous

J'aimerais connaitre le code VBA des 56 couleurs de la grille Excel

je vous joint un exemple d'un mini programme

Merci de vos réponses

Bonjour,

Si j'ai bien compris ta demande tu veux ça:

dont le code est :

Sub couleurs()
Dim i As Integer
Dim couleur
i = 1
With Feuil2
    For Each couleur In ThisWorkbook.Colors
        Range("a" & i) = couleur
        Range("b" & i).Interior.Color = couleur
        i = i + 1
    Next couleur
End With
End Sub

Je me suis contenté d'utiliser une boucle For Each pour parcourir toutes les couleurs de la collection Colors du classeur dans lequel le programme est codé.

merci de cette exemple qui me servira certainement

je suis pas un expert en VBA, je ne suis q'un amateur passionné

J'aimerais modifier le code couleurs qui est dans l'exemple fourni "exemple rouge"

MERCI

De rien

Saches que tu peux utiliser RGB(rouge, vert, bleu)

avec rouge, vert et bleu variants de 0 à 255, la valeur fournie par colors est simplement un calcul: rouge^3 + vert^2 + bleu^1 (si je ne me trompe pas).

Merci de ces réponses j'ai résolu ma demande

Rechercher des sujets similaires à "code couleur vba"