如何获取单元格在Microsoft Excel 2010中使用VBA的颜色
|在本文中,您将学习如何使用VBA代码获得单元格的颜色。
我们需要按照以下步骤启动VB编辑器。
单击“开发人员”选项卡。从“代码”组中,选择“ Visual Basic”
单击插入,然后单击模块
这将创建一个新模块。
在模块
中输入以下代码===函数ColorIndex(单元格颜色作为范围)
ColorIndex = CellColor.Interior.ColorIndex
结束函数
要获取以下单元格的颜色,请参考以下快照
在单元格B2中,将公式输入为= ColorIndex(A2),然后将公式复制到下面的单元格中。
[.underline]#让我们再举一个例子:#要知道特定颜色重复了多少次(按颜色计数),请参见下面的快照
我们可以将COUNTIF函数与新创建的UDFColorIndex函数一起使用。
===
COUNTIF:计算满足条件的范围内的单元格数。
语法:= COUNTIF(range,criteria)
范围:它指的是标准将检查找到的项目数的所选单元格的范围。
条件:条件定义要计数的单元格。
在单元格D2中,公式为= COUNTIF($ B $ 2:$ B $ 9,ColorIndex(D2))
通过将公式复制到单元格E2中,我们将按颜色获得计数。
这就是我们获取任何单元格颜色的方式。