Code RVB
4 réponses
-
Bonjour,
Vous avez un exemple pour MAJ couleur [Color] en RGB selon la palette des couleurs [Monteurs] le nom de la macro est : [Sub CodeCouleurRGB()] et vous avez une deuxième comme démo exemple avec couleur fond en (D2) et report en (E2) le nom de la macro est : Sub Couleur()
Le fichier ; https://www.cjoint.com/c/KItq6OKuIQn
-
Bonjour,
Et bien vous avez tout dans le code vous adaptez pour avoir la liste en colonne (R,V,B).
Ligne de code:Cells(n, 1).Offset(0, 4) = R & ", " & V & ", " & B
ou en 3 colonnes:Cells(n, 1).Offset(0, 4) = R
Cells(n, 1).Offset(0, 5) = V
Cells(n, 1).Offset(0, 6) = B
-
-
Bonjour,
j'ai récupéré vos codes.
mais peut-être il y a plus simple ?
voilà ça fonctionne
merci
' mis le total de vôtre opération : (= R + V * 256 + B * 65536)
' dans la colonne 9 (I)
'et la couleur s'affiche en colonne 10 (j)
Sub Couleur()
Dim CoulLong&
For n = 2 To 500
CoulLong = Cells(n, 9)
Cells(n, 10).Interior.Color = CoulLong
Next n
End Sub
-
-
Bonjour Geoff,
Ce n'est pas sur ce que vous dites : je vous propose d’utiliser votre code pour récupérer les couleurs de la colonne {Monteurs} et de la reproduire à côté de la colonne [D], peut être des différences de ton
-
ContributeurDans quel logiciel : Photoshop, Photofiltre, un autre ?
