EXCEL VBA 的统计问题？

在C列中,如果单元格内数字的个数大于6,那么就在D列显示"在".各个数字之间用空格(" ")格开的所有的单元格,不但中间,最左边和最右边都有空格.请问这个代码应该怎么写啊?

2026年09月25日 06:16

有1个网友回答

网友（1）：

先思考这个问题：

如果刚好是6个数字，那么空格个数应是7个。如果空格多于7个，那么数字肯定多于6个。

明白了这个，就好办了。

逻辑：原来的字符数量减去把空格替换为空后剩余的字符数量，得出的结果就是空格的数量。

公式计算：D4单元格的公式为：

=IF(LEN(C4)-LEN(SUBSTITUTE(C4," ",""))>7,"在","不在")

VBA计算：

Sub shishi()

If Len(Range("C4")) - Len(Replace(Range("C4"), " ", "")) > 7 Then

Range("D4") = "在"

Else

Range("D4") = "不在"

End If

End Sub