19.02.2010 - 16:03
Gestion des couleurs
J'ai une macro qui me cr9er des rectangles dans une feuilles, en
fonction du contenu dde la cellule qui se trouve juste en dessous.
Les cellules d'entete de mon tableau ont des couleurs diff9rentes. Je
souhaiterai que la couleur de fond de ma forme soit la mAme que la
couleur de fond de l'entete de la colonne de la cellule concern9.
J'utilise ceci :
maCouleur D .Cells(5, c.Column).Interior.ColorIndex
Puis ceci pour la couleur de fond de ma forme :
maLgn.Fill.ForeColor.SchemeColor D maCouleur
Ainsi les couleurs sont diff9rentes (le fond de ma cellule est jaune,
le fond de ma forme et bordeau fonc9)
SchemeColor ne correspond pas 0 colorIndex (ce qui est compr9hensible)
alors, quelle param8tre ou formule utiliser ?
Merci pour votre coup de main
Cordialement,
F.
19.02.2010 - 16:52
BonsourE FdeCourt avec ferveur ;o))) vous nous disiez :0
J'ai une macro qui me cr9er des rectangles dans une feuilles, en
fonction du contenu dde la cellule qui se trouve juste en dessous.
0
Les cellules d'entete de mon tableau ont des couleurs diff9rentes. =
Je
souhaiterai que la couleur de fond de ma forme soit la mAme que la
couleur de fond de l'entete de la colonne de la cellule concern9.
0
J'utilise ceci :
maCouleur D .Cells(5, c.Column).Interior.ColorIndex
0
Puis ceci pour la couleur de fond de ma forme :
maLgn.Fill.ForeColor.SchemeColor D maCouleur
0
Ainsi les couleurs sont diff9rentes (le fond de ma cellule est =
jaune,
le fond de ma forme et bordeau fonc9)
maLgn.Fill.ForeColor.SchemeColor D maCouleur + 7
J'ai une macro qui me cr9er des rectangles dans une feuilles, en
fonction du contenu dde la cellule qui se trouve juste en dessous.
0
Les cellules d'entete de mon tableau ont des couleurs diff9rentes. =
Je
souhaiterai que la couleur de fond de ma forme soit la mAme que la
couleur de fond de l'entete de la colonne de la cellule concern9.
0
J'utilise ceci :
maCouleur D .Cells(5, c.Column).Interior.ColorIndex
0
Puis ceci pour la couleur de fond de ma forme :
maLgn.Fill.ForeColor.SchemeColor D maCouleur
0
Ainsi les couleurs sont diff9rentes (le fond de ma cellule est =
jaune,
le fond de ma forme et bordeau fonc9)
maLgn.Fill.ForeColor.SchemeColor D maCouleur + 7
19.02.2010 - 17:00
Merci Modeste.
Et maintenant la question in9vitable : pourquoi ?
Qu'est ce qui justifie une gestion diff9rente de la couleur pour les
cellules et pour les shape (pourquoi cette diff9rence de 7) ?
Merci pour ton aide
Cordialement,
F.
Et maintenant la question in9vitable : pourquoi ?
Qu'est ce qui justifie une gestion diff9rente de la couleur pour les
cellules et pour les shape (pourquoi cette diff9rence de 7) ?
Merci pour ton aide
Cordialement,
F.
19.02.2010 - 17:09
bonjour,
a = Right("000000" & Hex(Cells(1, 1).Interior.Color), 6)
R = Evaluate("HEXDEC(""" & Right(a, 2) & """)")
G = Evaluate("HEXDEC(""" & Mid(a, 3, 2) & """)")
B = Evaluate("HEXDEC(""" & Left(a, 2) & """)")
ActiveSheet.Shapes(1).Fill.ForeColor.RGB = RGB(R, G, B)
isabelle
Le 2010-02-19 10:03, FdeCourt a écrit :
Bonjour à tous,
J'ai une macro qui me créer des rectangles dans une feuilles, en
fonction du contenu dde la cellule qui se trouve juste en dessous.
Les cellules d'entete de mon tableau ont des couleurs différentes. Je
souhaiterai que la couleur de fond de ma forme soit la même que la
couleur de fond de l'entete de la colonne de la cellule concerné.
J'utilise ceci :
maCouleur = .Cells(5, c.Column).Interior.ColorIndex
Puis ceci pour la couleur de fond de ma forme :
maLgn.Fill.ForeColor.SchemeColor = maCouleur
Ainsi les couleurs sont différentes (le fond de ma cellule est jaune,
le fond de ma forme et bordeau foncé)
SchemeColor ne correspond pas à colorIndex (ce qui est compréhensible)
alors, quelle paramètre ou formule utiliser ?
Merci pour votre coup de main
Cordialement,
F.
a = Right("000000" & Hex(Cells(1, 1).Interior.Color), 6)
R = Evaluate("HEXDEC(""" & Right(a, 2) & """)")
G = Evaluate("HEXDEC(""" & Mid(a, 3, 2) & """)")
B = Evaluate("HEXDEC(""" & Left(a, 2) & """)")
ActiveSheet.Shapes(1).Fill.ForeColor.RGB = RGB(R, G, B)
isabelle
Le 2010-02-19 10:03, FdeCourt a écrit :
Bonjour à tous,
J'ai une macro qui me créer des rectangles dans une feuilles, en
fonction du contenu dde la cellule qui se trouve juste en dessous.
Les cellules d'entete de mon tableau ont des couleurs différentes. Je
souhaiterai que la couleur de fond de ma forme soit la même que la
couleur de fond de l'entete de la colonne de la cellule concerné.
J'utilise ceci :
maCouleur = .Cells(5, c.Column).Interior.ColorIndex
Puis ceci pour la couleur de fond de ma forme :
maLgn.Fill.ForeColor.SchemeColor = maCouleur
Ainsi les couleurs sont différentes (le fond de ma cellule est jaune,
le fond de ma forme et bordeau foncé)
SchemeColor ne correspond pas à colorIndex (ce qui est compréhensible)
alors, quelle paramètre ou formule utiliser ?
Merci pour votre coup de main
Cordialement,
F.
19.02.2010 - 17:17
BonsourE FdeCourt avec ferveur ;o))) vous nous disiez :0
Et maintenant la question in9vitable : pourquoi ?
Qu'est ce qui justifie une gestion diff9rente de la couleur pour les
cellules et pour les shape (pourquoi cette diff9rence de 7) ?
;o)))
By design0
les 9quipes de d9veloppement sont internationales et renouvell9es =
, les versions ont chang9 avec les ann9es,
les sp9cifications initiales ne sont plus en accord avec les =
sp9cifications actuelles et futures,
c'est pourquoi de nombreuses verrues existent et perdurent ...0
il faut s'adapter ...
je n'ai pas encore EXCEL 2007 :-(
et d9ja la b9ta 2010 est disponible
http://co1piltwb.partners.extranet.microsoft.com/mcoeredir/mcoeredirect.a=
spx?linkIdD13229894&s1Dc2cb3b62-0fe3-342d-a160-da1bbbd95a15
Et maintenant la question in9vitable : pourquoi ?
Qu'est ce qui justifie une gestion diff9rente de la couleur pour les
cellules et pour les shape (pourquoi cette diff9rence de 7) ?
;o)))
By design0
les 9quipes de d9veloppement sont internationales et renouvell9es =
, les versions ont chang9 avec les ann9es,
les sp9cifications initiales ne sont plus en accord avec les =
sp9cifications actuelles et futures,
c'est pourquoi de nombreuses verrues existent et perdurent ...0
il faut s'adapter ...
je n'ai pas encore EXCEL 2007 :-(
et d9ja la b9ta 2010 est disponible
http://co1piltwb.partners.extranet.microsoft.com/mcoeredir/mcoeredirect.a=
spx?linkIdD13229894&s1Dc2cb3b62-0fe3-342d-a160-da1bbbd95a15
19.02.2010 - 17:20
BonsourE FdeCourt avec ferveur ;o))) vous nous disiez :0
J'utilise ceci :
maCouleur D .Cells(5, c.Column).Interior.ColorIndex
0
Puis ceci pour la couleur de fond de ma forme :
maLgn.Fill.ForeColor.SchemeColor D maCouleur
;o)))
ou encore0
maCouleur D .Cells(5, c.Column).Interior.Color
maLgn.Fill.ForeColor.RGB D maCouleur
0
J'utilise ceci :
maCouleur D .Cells(5, c.Column).Interior.ColorIndex
0
Puis ceci pour la couleur de fond de ma forme :
maLgn.Fill.ForeColor.SchemeColor D maCouleur
;o)))
ou encore0
maCouleur D .Cells(5, c.Column).Interior.Color
maLgn.Fill.ForeColor.RGB D maCouleur
0
19.02.2010 - 18:43
Ok, ce n'est pas volontaire.
Il y aurait pu avoir des raisons qui me sont obscure pour justifier ce
genre de truc.....
Merci pour les infos
Cordialement,
F.
Il y aurait pu avoir des raisons qui me sont obscure pour justifier ce
genre de truc.....
Merci pour les infos
Cordialement,
F.
Ähnliche Themen
couleurs
30.04.2011 - 09:00 - Posts: 4
Les couleurs
05.06.2010 - 20:59 - Posts: 5
les couleurs
04.08.2010 - 08:48 - Posts: 22
Des couleurs.
05.12.2009 - 18:07 - Posts: 4
Couleurs
22.03.2010 - 14:32 - Posts: 9
les couleurs
04.08.2010 - 08:50 - Posts: 1
Des goûts et des couleurs
25.01.2012 - 18:01 - Posts: 34
More
Search
