作者:乔山办公网日期:
返回目录:excel表格制作
引用microsoft common dialog control 6.0,添加百commondialog控件,用showcolor方法度就可以了。
CommonDialog1.ShowColor
meColor=CommonDialog1.Color 'mecolor就是专所选取的颜色属值
1、可以参照下表查询某种颜色来的ColorIndex值。
2、首先需要创建一个按钮控件,在EXCEL表格的空白页下,效果如如下图所示:
3、点击鼠标右键,找到指定宏,创建一个宏模块,操自作界面如下图所示:
4、进入到vbaproject项目模式下,找到模块一,需要在模块一的界面下编写代码,效果如下图所示:
5、接下来就是编写代码,代码编写:
SubMsg()
Sheet1.Range("C2:E6").Interior.ColorIndex=27
EndSub
6、最后点击按zhidao钮控件,触发代码,运行结果,显示背景色,vba中代码.Interior.ColorIndex=27数值为27的背景色结果显示:
不太理解你的要求,什么是“目前所选区块”,不选中就不起作用吗?
第一种情况用条件格式
第二种情况要用vba,但数据量大时,速度难说
如果需要随机颜色,建议把[B2]改成int(rnd*255^3),由zhidaoVBA自己取随机数。
因为vba取b2时,会以b2当前计算出的数值为准,不会再次重新计算,所以一直是版同一个颜色。
至于黑色,因为很多颜色很深,看不出来是不是真的纯黑。你可以重新计算b2生成一个新数值再运行你的宏,颜色应该就不一样了权。