Excel VBA-CountIfs-从一个电子表格移动到另一个

Question

我正在为一个项目编写CountIfs公式，遇到了一些小麻烦。我正在从人力资源数据详细信息工作表中提取数据，并将其粘贴到人事数据摘要。在我的CountIfs公式的末尾，我有一个范围Z2:Z，它包含工作表人力资源数据摘要中的2017年、2018年和2019年。我希望人力资源数据汇总上的单元格C2是一个可以在任何年份自动填写的框。例如，如果我将2018放入C2，那么我希望CountIfs公式提取该特定年份的数据。

Sub Linking ()
'Defining finRow
Sheets("HR Data Detail". Activate)
Dim finRow As String
finRow = Sheets("HR Data Detail").Range("A50000").End(xlUp).Row
With Sheets ("HR Data Detail")
'Division 21 Employees
Sheets("HR Data Summary").Range("L4") = _
Application.WorksheetFunction.CountIfs(.Range("V2:V" & finRow), ">0", _
.Range("S2:S" & finRow), "=21", .Range("L2:L" & finRow), "=January", _
.Range("H2:H" & finRow), "=Employee", _
Sheets("HR Data Detail").Range("Z2:Z" & finRow), "'HR Data Summary'!C2")

Answer 1

假设我理解这个复杂的COUNTIFS公式的目的-

问题似乎出在最后一个范围/标准组合上。尝试更改

Sheets("HR Data Detail").Range("Z2:Z" & finRow), "'HR Data Summary'!C2")

到以下位置：

.Range("Z2:Z" & finRow), "=" & Sheets("HR Data Summary").Range("$C$2").Value