Bonjour,
Dans un UserForm je demande à des utilisateurs de sélectionner des codes de
couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour
appliquer les couleurs dans un autreusre form en tant que couleur de fond sur
des objets.
Le problème c'est que la fonction backcolor utilise des couleurs en RGB,
comment puis je lire le code RGB d'une couleur choisie par colorindex
pour avoir une palette de couleurs, tu pourrais faire une boucle, par exemple
Sub RGBcouleur() Application.ScreenUpdating = False For r = 0 To 255 Step 16 For g = 0 To 255 Step 16 For b = 0 To 255 Step 16 x = x + 1 RGBValue = RGB(r, g, b) Range("A" & x).Interior.Color = RGBValue Range("b" & x) = r & " " & g & " " & b Next Next Next Application.ScreenUpdating = True End Sub
"Laurent" a écrit dans le message de news:
Bonjour, Dans un UserForm je demande à des utilisateurs de sélectionner des codes de
couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour
appliquer les couleurs dans un autreusre form en tant que couleur de fond sur
des objets. Le problème c'est que la fonction backcolor utilise des couleurs en RGB, comment puis je lire le code RGB d'une couleur choisie par colorindex
Merci d'avance Laurent
bonjour laurent
je te copie la réponse qu'avait faite la plus adorable des geôlières que nos
prisons aient connues :
HTH
jps
pour avoir une palette de couleurs, tu pourrais faire une boucle, par
exemple
Sub RGBcouleur()
Application.ScreenUpdating = False
For r = 0 To 255 Step 16
For g = 0 To 255 Step 16
For b = 0 To 255 Step 16
x = x + 1
RGBValue = RGB(r, g, b)
Range("A" & x).Interior.Color = RGBValue
Range("b" & x) = r & " " & g & " " & b
Next
Next
Next
Application.ScreenUpdating = True
End Sub
"Laurent" <Laurent@discussions.microsoft.com> a écrit dans le message de
news:03AF9F4D-2F5C-4A5C-8E67-220ABDDD0855@microsoft.com...
Bonjour,
Dans un UserForm je demande à des utilisateurs de sélectionner des codes
de
couleurs via la fonction colorindex, je souhaiterais récupérer ces codes
pour
appliquer les couleurs dans un autreusre form en tant que couleur de fond
sur
des objets.
Le problème c'est que la fonction backcolor utilise des couleurs en RGB,
comment puis je lire le code RGB d'une couleur choisie par colorindex
pour avoir une palette de couleurs, tu pourrais faire une boucle, par exemple
Sub RGBcouleur() Application.ScreenUpdating = False For r = 0 To 255 Step 16 For g = 0 To 255 Step 16 For b = 0 To 255 Step 16 x = x + 1 RGBValue = RGB(r, g, b) Range("A" & x).Interior.Color = RGBValue Range("b" & x) = r & " " & g & " " & b Next Next Next Application.ScreenUpdating = True End Sub
"Laurent" a écrit dans le message de news:
Bonjour, Dans un UserForm je demande à des utilisateurs de sélectionner des codes de
couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour
appliquer les couleurs dans un autreusre form en tant que couleur de fond sur
des objets. Le problème c'est que la fonction backcolor utilise des couleurs en RGB, comment puis je lire le code RGB d'une couleur choisie par colorindex
Merci d'avance Laurent
jps
heu je pense qu'il est plus judicieux de faire un Step 15 de façon à arriver à laver plus blanc que blanc avec 255 255 255 ce n'était qu'un aparté auquel isabelle ne va pas manquer de réagir quand elle aura mis le pied parterre... jps
"jps" a écrit dans le message de news:
bonjour laurent je te copie la réponse qu'avait faite la plus adorable des geôlières que nos
pour avoir une palette de couleurs, tu pourrais faire une boucle, par exemple
Sub RGBcouleur() Application.ScreenUpdating = False For r = 0 To 255 Step 16 For g = 0 To 255 Step 16 For b = 0 To 255 Step 16 x = x + 1 RGBValue = RGB(r, g, b) Range("A" & x).Interior.Color = RGBValue Range("b" & x) = r & " " & g & " " & b Next Next Next Application.ScreenUpdating = True End Sub
"Laurent" a écrit dans le message de news:
Bonjour, Dans un UserForm je demande à des utilisateurs de sélectionner des codes de
couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour
appliquer les couleurs dans un autreusre form en tant que couleur de fond
sur
des objets. Le problème c'est que la fonction backcolor utilise des couleurs en RGB, comment puis je lire le code RGB d'une couleur choisie par colorindex
Merci d'avance Laurent
heu je pense qu'il est plus judicieux de faire un Step 15 de façon à arriver
à laver plus blanc que blanc avec 255 255 255
ce n'était qu'un aparté auquel isabelle ne va pas manquer de réagir quand
elle aura mis le pied parterre...
jps
"jps" <adresse@ntiscud> a écrit dans le message de
news:OA1Hd1fVFHA.2664@TK2MSFTNGP15.phx.gbl...
bonjour laurent
je te copie la réponse qu'avait faite la plus adorable des geôlières que
nos
pour avoir une palette de couleurs, tu pourrais faire une boucle, par
exemple
Sub RGBcouleur()
Application.ScreenUpdating = False
For r = 0 To 255 Step 16
For g = 0 To 255 Step 16
For b = 0 To 255 Step 16
x = x + 1
RGBValue = RGB(r, g, b)
Range("A" & x).Interior.Color = RGBValue
Range("b" & x) = r & " " & g & " " & b
Next
Next
Next
Application.ScreenUpdating = True
End Sub
"Laurent" <Laurent@discussions.microsoft.com> a écrit dans le message de
news:03AF9F4D-2F5C-4A5C-8E67-220ABDDD0855@microsoft.com...
Bonjour,
Dans un UserForm je demande à des utilisateurs de sélectionner des codes
de
couleurs via la fonction colorindex, je souhaiterais récupérer ces codes
pour
appliquer les couleurs dans un autreusre form en tant que couleur de
fond
sur
des objets.
Le problème c'est que la fonction backcolor utilise des couleurs en RGB,
comment puis je lire le code RGB d'une couleur choisie par colorindex
heu je pense qu'il est plus judicieux de faire un Step 15 de façon à arriver à laver plus blanc que blanc avec 255 255 255 ce n'était qu'un aparté auquel isabelle ne va pas manquer de réagir quand elle aura mis le pied parterre... jps
"jps" a écrit dans le message de news:
bonjour laurent je te copie la réponse qu'avait faite la plus adorable des geôlières que nos
pour avoir une palette de couleurs, tu pourrais faire une boucle, par exemple
Sub RGBcouleur() Application.ScreenUpdating = False For r = 0 To 255 Step 16 For g = 0 To 255 Step 16 For b = 0 To 255 Step 16 x = x + 1 RGBValue = RGB(r, g, b) Range("A" & x).Interior.Color = RGBValue Range("b" & x) = r & " " & g & " " & b Next Next Next Application.ScreenUpdating = True End Sub
"Laurent" a écrit dans le message de news:
Bonjour, Dans un UserForm je demande à des utilisateurs de sélectionner des codes de
couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour
appliquer les couleurs dans un autreusre form en tant que couleur de fond
sur
des objets. Le problème c'est que la fonction backcolor utilise des couleurs en RGB, comment puis je lire le code RGB d'une couleur choisie par colorindex
Merci d'avance Laurent
Misange
Bonjour
REgarde ces solutions toutes faites http://www.excelabo.net/xl/controles.php#palettecouleur http://www.excelabo.net/moteurs/compteclic.php?nomü-couleurs
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Le 11/05/2005 09:20, :
Bonjour, Dans un UserForm je demande à des utilisateurs de sélectionner des codes de couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour appliquer les couleurs dans un autreusre form en tant que couleur de fond sur des objets. Le problème c'est que la fonction backcolor utilise des couleurs en RGB, comment puis je lire le code RGB d'une couleur choisie par colorindex
Merci d'avance Laurent
Bonjour
REgarde ces solutions toutes faites
http://www.excelabo.net/xl/controles.php#palettecouleur
http://www.excelabo.net/moteurs/compteclic.php?nomü-couleurs
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
Le 11/05/2005 09:20, :
Bonjour,
Dans un UserForm je demande à des utilisateurs de sélectionner des codes de
couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour
appliquer les couleurs dans un autreusre form en tant que couleur de fond sur
des objets.
Le problème c'est que la fonction backcolor utilise des couleurs en RGB,
comment puis je lire le code RGB d'une couleur choisie par colorindex
REgarde ces solutions toutes faites http://www.excelabo.net/xl/controles.php#palettecouleur http://www.excelabo.net/moteurs/compteclic.php?nomü-couleurs
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Le 11/05/2005 09:20, :
Bonjour, Dans un UserForm je demande à des utilisateurs de sélectionner des codes de couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour appliquer les couleurs dans un autreusre form en tant que couleur de fond sur des objets. Le problème c'est que la fonction backcolor utilise des couleurs en RGB, comment puis je lire le code RGB d'une couleur choisie par colorindex
Merci d'avance Laurent
Laurent
Merci, beaucoup pour les réponses, j'ai réussi à trouver mon bonheur.
Laurent
Bonjour
REgarde ces solutions toutes faites http://www.excelabo.net/xl/controles.php#palettecouleur http://www.excelabo.net/moteurs/compteclic.php?nomü-couleurs
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Le 11/05/2005 09:20, :
Bonjour, Dans un UserForm je demande à des utilisateurs de sélectionner des codes de couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour appliquer les couleurs dans un autreusre form en tant que couleur de fond sur des objets. Le problème c'est que la fonction backcolor utilise des couleurs en RGB, comment puis je lire le code RGB d'une couleur choisie par colorindex
Merci d'avance Laurent
Merci, beaucoup pour les réponses, j'ai réussi à trouver mon bonheur.
Laurent
Bonjour
REgarde ces solutions toutes faites
http://www.excelabo.net/xl/controles.php#palettecouleur
http://www.excelabo.net/moteurs/compteclic.php?nomü-couleurs
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
Le 11/05/2005 09:20, :
Bonjour,
Dans un UserForm je demande à des utilisateurs de sélectionner des codes de
couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour
appliquer les couleurs dans un autreusre form en tant que couleur de fond sur
des objets.
Le problème c'est que la fonction backcolor utilise des couleurs en RGB,
comment puis je lire le code RGB d'une couleur choisie par colorindex
Merci, beaucoup pour les réponses, j'ai réussi à trouver mon bonheur.
Laurent
Bonjour
REgarde ces solutions toutes faites http://www.excelabo.net/xl/controles.php#palettecouleur http://www.excelabo.net/moteurs/compteclic.php?nomü-couleurs
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Le 11/05/2005 09:20, :
Bonjour, Dans un UserForm je demande à des utilisateurs de sélectionner des codes de couleurs via la fonction colorindex, je souhaiterais récupérer ces codes pour appliquer les couleurs dans un autreusre form en tant que couleur de fond sur des objets. Le problème c'est que la fonction backcolor utilise des couleurs en RGB, comment puis je lire le code RGB d'une couleur choisie par colorindex
