表格圖例
方法1：開發工具--visual basic--插入--模塊
Function 統計(a, b, c, d, e)
For i = 1 To a.Rows.Count
If b = a.Cells(i, 1) And a.Cells(i, c) >= e And a.Cells(i, d) >= e Then
統計 = 統計 + 1
End If
Next
End Function
保存後，在h3輸入=統計($B$2:$E$9,G3,3,4,90)
說明： $B$2:$E$9為查詢區域 ,G3查詢班級條件 ,3語文 為條件右側第幾列 ,4為數學在條件列右側第幾列 ,90指要大於的數值
方法二：簡化法
Function 統計2(a, b)
For i = 1 To a.Rows.Count
If b = a.Cells(i, 1) And a.Cells(i, 3) >= 90 And a.Cells(i, 4) >= 90 Then
統計2 = 統計2 + 1
End If
Next
End Function
I3輸入公式 =統計2($B$2:$E$9,G3) $B$2:$E$9為查詢區域 ,G3查詢條件
分享到:
閱讀更多 淡墨留餘香 的文章
