<pre class=\"replyask-text\" id=\"content-2685814\">那就用VBA来实现吧,在所计算数据外任何一个单元格输入:
=ddd(a1, b1, a2, b2)
注:a1, b1, a2, b2代表从a1行b1列到a2行b2列
例:=ddd(1,1,20,9)代表从A1到I20的数据区域进行相同行统计
Function ddd(a1, b1, a2, b2)
Dim i, j, m, n As Integer
m = 0
For i = a1 To a2
n = 1
For j = (b1 1) To b2
If Cells(i, b1)Cells(i, j) Then
n = 0
GoTo fstfor
End If
Next
fstfor:
m = m n
Next
ddd = m
End Function |