Changement backcolor de la forme

Je suis en train de mettre à jour la propriété backcolor de toutes les étiquettes que j'ai sur une feuille de calcul. Je tiens à indiquer la couleur en utilisant les valeurs RVB, mais je suis coincé à deux endroits. Voici le code que j'ai en ce moment:

Sheet2.Shapes("Label 2").Fill.BackColor.RGB = RGB(220, 105, 0)

Ce code sera exécuté sans erreur, mais il ne semble pas avoir d'effet. Mon label commence blanc (ou peut-être transparentes) et ne change jamais. Quelqu'un peut me dire ce que je dois faire pour faire ce travail? J'ai aussi ajouté de cela, mais il n'a rien fait:

shp.Fill.Solid

Prochaine, j'aimerais saisir cette valeur RVB dans une variable de sorte que je n'ai pas à saisir de nouveau à plusieurs reprises. Essentiellement, je suis à la recherche de quelque chose comme ceci:

dim col as Color
col = RGB(220,105,0)
Sheet2.Shapes("Label 2").Fill.BackColor.RGB = col

Je sais qu'il n'y a pas de type de variable appelée la Couleur, mais je pense que vous pouvez voir ce que je suis en train de faire.

InformationsquelleAutor Alex | 2012-07-19