VBA无法获取WorksheetFunction类Sumif属性问题求助

• 错误核心原因：

  1. WorksheetFunction.SumIf 在无匹配条件的单元格时会直接抛出运行时错误，这是最常见触发点。
  2. 参数引用问题：条件区域与求和区域大小不匹配、引用无效范围，或条件格式与目标单元格格式不兼容。

• 实操修复步骤：

  1. 替换函数调用：
     用Application.SumIf替代WorksheetFunction.SumIf，它在无匹配结果时返回#N/A而非中断代码，后续可通过判断处理：

     Dim sumResult As Variant
     sumResult = Application.SumIf(Range("条件区域"), "匹配条件", Range("求和区域"))
     ' 无匹配时默认设为0，可按需调整
     If IsError(sumResult) Then sumResult = 0
     

  2. 校验参数有效性：
     • 确保条件区域和求和区域的单元格数量一致，避免大小不匹配。
     • 检查条件格式与目标单元格格式是否统一（比如文本型数字和数值型数字的差异会导致无匹配）。
     • 尽量缩小引用范围（如用Range("A1:A100")替代Range("A:A")），减少空值干扰。

• 针对你的ValidationNo5()代码的排查建议：
  把代码里的WorksheetFunction.SumIf替换为Application.SumIf，同时确认三个参数的正确性：

  • 第一个参数：用于条件判断的单元格范围
  • 第二个参数：匹配条件（支持常量、单元格引用或表达式）
  • 第三个参数：需要求和的单元格范围（可选，省略时对条件区域求和）

内容的提问来源于stack exchange，提问作者Zain