Transformer couleur en valeur numérique

Dernière mise à jour le 20 septembre 2008 à 10:10 par Nilou17
Publié par Furtif
Cette macro permet d'obtenir le code d'une couleur, pour traitement ultérieur selon votre besoin
Sub distri_couleur()
  Dim i
  For i = 1 To 12
    Worksheets(1).Range("C" & i).Value = Worksheets(1).Range("B" & i).Interior.Color
  Next i
End Sub
'Remplacer le 10 par le nombre de lignes que vous souhaitez traiter.
'Remplacer le "I" par la colonne que vous souhaitez utiliser pour le résultat (code de couleur).
'Remplacer le "B" par la colonne qui contient les couleurs à filtrer.
Meilleures réponses pour « Transformer couleur en valeur numérique » dans :
[Shell] Tester une variable numérique VoirTester une variable numérique    Préambule Dans un environnement "shell", les variables sont, par défaut, de type "chaîne de caractères". De ce fait il n'est pas possible de déclarer une variable de type "entier" (enfin, ceci n'est pas tout à...
L'analogique et le numérique VoirQuelle est la différence entre analogique et numérique ? Les phénomènes qui nous entourent sont quasiment tous continus, c'est-à-dire que lorsque ces phénomènes sont quantifiables, ils passent d'une valeur à une autre sans discontinuité. Ainsi,...
Le codage RGB (RVB) VoirLe codage RGB Le codage RGB (Red, green, blue, pour Rouge Vert Bleu, en français RVB), mis au point en 1931 par la Commission Internationale de l'Eclairage (CIE) consiste à représenter l'espace des couleurs à partir de trois rayonnements...
Les unités dans les feuilles de style (CSS) VoirLes unités Grâce aux feuilles de style il est possible de définir des valeurs numériques pour les propriétés de style de plusieurs façons : de façon absolue, c'est-à-dire dans une unité indépendante du format de sortie (en centimètres par...