中值 If 函数给出 运行 时间错误“438”
MedianIf Function giving Run-timer Error '438'
我没有看到这行代码中的错误。也许我需要第二双眼睛来识别它：
targetWs.Cells(subRow, 7) = Application.WorksheetFunction.MedianIf(sourceWs.Range("X3:X92"), ">" & 0)
Median If 不是 WorksheetFunction 的子项。它不存在。
这将是数组公式：
MEDIAN(IF(X3:X92 > 0,X3:X92))
所以我们需要使用Worksheet.Evaluate():
targetWs.Cells(subRow, 7) = sourceWs.Evaluate("MEDIAN(IF(X3:X92 > 0,X3:X92))")
我没有看到这行代码中的错误。也许我需要第二双眼睛来识别它：
targetWs.Cells(subRow, 7) = Application.WorksheetFunction.MedianIf(sourceWs.Range("X3:X92"), ">" & 0)
Median If 不是 WorksheetFunction 的子项。它不存在。
这将是数组公式：
MEDIAN(IF(X3:X92 > 0,X3:X92))
所以我们需要使用Worksheet.Evaluate():
targetWs.Cells(subRow, 7) = sourceWs.Evaluate("MEDIAN(IF(X3:X92 > 0,X3:X92))")