Excel 2010 - 细胞和形状着色 - 我的想法

Excel 2003有一个简单的... interior.colorindex和只有56个数字。但是，Excel 2010对此进行了更改，以便更好地进行控制。Excel 2010 - 细胞和形状着色 - 我的想法

现在同时开发这应该复制单元格颜色（VBA），把小区的相同颜色取决于单元格内容的Excel形状的计划......我用几个不同的对象丢失像这样：

对于细胞：

Sheets("Config").Range("E1").Interior.ThemeColor = 10 
Sheets("Config").Range("E1").Interior.TintAndShade = -0.249977111117893

对于形状：

Activesheet.shapes("R3").fill.forecolor.objectthemecolor = 7 
Activesheet.shapes("R3").fill.forecolor.brightness = 0.6 
Activesheet.shapes("R3").fill.forecolor.schemecolor = 42 
Activesheet.shapes("R3").fill.forecolor.tintandshade (and this doesn't even work)

来源

2011-10-21 ihightower

这是确定的（有时甚至鼓励）问一个问题，自己回答这个问题，但你应该把它分成两个不同的部分 - 问题和答案。当你在这里发布的内容全部发布为“问题”时，似乎大部分内容实际上应该在“答案”中。 – Flexo

我同意awoodland提到的。这个问题不需要回答。请关闭这个问题。 – Buddha

正如@awoodland所说。请删除问题中的答案，并将其添加为实际答案。 – mischab1

我发现它不要求所有上述各色更好更简单的方法NT命名..

所有你需要的是：

range("b9").Interior.Color

将返回一个长......这样的例子：682978

（在十进制十六进制颜色）而且，您可以设置形状像这样的颜色：

.Shapes(xName).Fill.ForeColor.RGB = 682978 (some variable)

其他有用的笔记有：

range("h1").Interior.Color = rgb(0,123,124)

，并在控制台打印

? rgb(0, 123, 124)

来源

2012-01-20 20:49:03 Flexo

Excel 2010 - 细胞和形状着色 - 我的想法

回答

相关问题