我有一个考勤电子表格,其中的数据以3种不同的颜色突出显示。 在电子表格的底部,我有一个CountA公式来计算所有具有'x'估算值的单元格,每天进行总计数。 我还需要一个公式,该公式将进行相同的计数,但仅通过突出显示的单元格的颜色。 当数据在电子表格上更改或更新时,此公式也将需要自动更新。 我对Excel非常熟悉,但是我几乎没有创建VGA的经验,并且目前还没有创造出能够正常工作的VGA的运气。

#1楼 票数:0

如果您没有使用VBA的经验,这将使您感到有些不知所措,但是SO上已经有一些问题和答案-请在此处此处查看

无论如何,您是否考虑过使用“按颜色过滤”作为替代? 使用Data > Filter ,然后选择Filter by Color 过滤后,您应该在Excel窗口的左下角找到一个漂亮的计数。

图片01

图片02

图片03

#2楼 票数:0

你可以试试看 以下代码要求输入一个单元格参考(以接收要搜索的颜色),以找到在指定范围内使用指定颜色找到的单元格数量。 并将计数的数字返回到消息框中。

Sub Color()
    Dim colorCount, colorVal As Double
    Dim rng, cell As Range

    colorCount = 0
    Set rng = Application.InputBox(prompt:="Write a cell address that already has the desired color.(e.g.:A1)", Title:="Define the color.", Type:=8)
    colorVal = Cells(rng.Row, rng.Column).Interior.Color
    For Each cell In Range("a1:a5")
        If cell.Interior.Color = colorVal Then
            colorCount = colorCount + 1
        End If
    Next
    MsgBox colorCount
End Sub

  ask by S. Hammock translate from so

未解决问题?本站智能推荐:

1回复

根据 COUNTA 公式选择单元格的 VBA 代码

我想根据列 X 中计算的名称数量选择 U 列中的一个单元格(见黄色突出显示)+ 加 1 以获得正确的行。 为了说明,突出显示的黄色单元格。 谢谢你。 ![]: ( https://i.stack.imgur.com/Pua8G.png )
1回复

计算包含数据的列中的单元格数

我有以下代码: 并希望能够用变量替换17 ,因为某些工作簿中有一个额外的组。 我不能仅仅计算行数,因为第一和最后之间有信息,但是在不同的列中。 有没有一种方法可以计算在设置的列中有数据可能不连续的单元格的数量(那么我可以用等于变量-1的变量替换17 )?
1回复

需要帮助,Excel公式,计算与不同范围内容匹配的范围内的单元格数

我在Excel上表现不错,但这吸引了我。 我输入的范围很广-$ D7:$ AH7 我想知道这些条目在此范围内出现多少次-$ K $ 7:$ V $ 10 我已经尝试过countif数组,但我认为它试图将行与行而不是针对整个查找范围将我范围内的每个条目进行匹配。 我还尝试将查找
6回复

计算excel单元格中每个单词的字符数

例如,如果我在一个单元格中有一句话: 输出应该是 我已经尝试在几个组合中使用len()和trim()函数,但还没有设法找到解决方案,担心只能通过使用 VBA 来完成。
1回复

Excel VBA 计算一行中的非空白单元格

好的,所以我在另一个线程上找到了这种计算空白的方法,但它对我不起作用。 我已经包含了我声明的变量和我需要帮助的代码片段。 我的宏的其余部分以当前选择的单元格为中心。 我需要能够计算选择的任何行中的所有非空白单元格。 列数始终是一个常数 - 182。使用我正在测试的数据,我应该得到 49 个非空白
1回复

计算已用行中的空单元格

我有以下我想要的 VBA 代码,用于计算使用的行数,然后在 B 列中找到空单元格的数量,它返回语法错误 谢谢你的帮助
2回复

VBA 在选定的单元格中查找重复项并计算它们

我在这个论坛上阅读了很多关于我的问题的帖子,但找不到解决方案。 我有一个具有不同单元格数量的表格,具有重复的值。 我想计算重复项并显示在另一列中。 我标记了几个单元格的源表: 我想收到这样的输出 A 有一部分代码,但无论我选择什么,它都会计算最后一个单元格 我错过了什么?
2回复

计算单元格中活动单元上方最多两列的值(不包括标题)

我正在尝试计算一列中所有具有高于活动单元格值的单元格,不包括标题和活动单元格正上方的单元格。 例如,如果我有一列 1个 5 4 不适用 4 当前单元格 我希望当前单元格等于2。(计算5和4,不是N / AN / A,不是当前单元格上方的单元格,也不是第