SUMIFS函数仅在应用数值条件时失效，求助排查解决

先给你揪出几个核心问题，再给你改好可用的代码：

问题1：语法错误直接导致代码报错 #

你原代码里倒数第4行末尾漏了个逗号（就是FundNoCmboBx那一行的下划线后面），这个语法错误会直接让代码无法运行，得先补上。

问题2：空白值的匹配逻辑完全错了 #

当Me.PassthroughCmboBx.Value是空白时，你当前的写法会生成"**"的通配符条件，这会匹配所有非空单元格，而不是你想要的空白单元格。正确逻辑应该是：下拉框为空时匹配空白单元格，有内容时再做模糊匹配。

问题3：数值类型条件误用了文本通配符 #

FundNoCmboBx、OrgTxtBx、AccountTxtBx对应的是数值列，但SUMIFS的*通配符只对文本型数据有效，对数值型单元格用*xxx*这种条件会完全匹配不到——因为数值和文本的匹配规则不一样。

修改后的完整代码 #

我把所有问题都修复了，代码里加了注释说明逻辑：

Dim GS As Worksheet
Set GS = Worksheets("Grant Spreadsheet")
Dim LastRow As Long

With GS
    LastRow = .Cells(.Rows.Count, "W").End(xlUp).Row ' 改成更健壮的行号获取方式
    
    ' 改用SUMPRODUCT，它比SUMIFS更灵活，支持混合类型条件匹配
    Me.TGATxtBx.Value = Application.SumProduct( _
        ' 文本型条件的模糊匹配
        --(.Range("E2:E" & LastRow) Like "*" & Me.GrantNameCmboBx.Value & "*"), _
        --(.Range("N2:N" & LastRow) Like "*" & Me.GrantAgencyCmboBx.Value & "*"), _
        --(.Range("O2:O" & LastRow) Like "*" & Me.GrantDeptCmboBx.Value & "*"), _
        --(.Range("P2:P" & LastRow) Like "*" & Me.ProgramCmboBx.Value & "*"), _
        --(.Range("D2:D" & LastRow) Like "*" & Me.ProjTypeCmboBx.Value & "*"), _
        --(.Range("R2:R" & LastRow) Like "*" & Me.CatalogNoCmboBx.Value & "*"), _
        --(.Range("S2:S" & LastRow) Like "*" & Me.GrantIDCmboBx.Value & "*"), _
        
        ' 处理Passthrough的空白匹配逻辑
        --(IIf(Trim(Me.PassthroughCmboBx.Value) = "", _
            Trim(.Range("Q2:Q" & LastRow)) = "", _
            .Range("Q2:Q" & LastRow) Like "*" & Me.PassthroughCmboBx.Value & "*")), _
            
        ' 数值型条件的模糊匹配：先转文本再用Like
        --(Trim(Str(.Range("H2:H" & LastRow))) Like "*" & Trim(Me.FundNoCmboBx.Value) & "*"), _
        --(Trim(Str(.Range("I2:I" & LastRow))) Like "*" & Trim(Me.OrgTxtBx.Value) & "*"), _
        --(Trim(Str(.Range("K2:K" & LastRow))) Like "*" & Trim(Me.AccountTxtBx.Value) & "*"), _
        
        ' 要求和的目标列
        .Range("W2:W" & LastRow) _
    )
End With

代码关键说明 #

1. 语法错误修复：补上了原代码遗漏的逗号，解决编译报错问题。
2. 空白值处理：用IIf判断下拉框状态，为空时专门匹配空白单元格，不为空时执行模糊匹配。
3. 数值条件适配：用Str把数值单元格转成文本格式，再用Like实现模糊匹配，绕开SUMIFS对数值不支持通配符的限制。
4. 改用SUMPRODUCT：比SUMIFS更灵活，能同时处理文本模糊匹配、空白判断、数值转文本匹配等混合场景。

如果你的数值列是精确匹配需求，可把数值条件改成如下形式（以上FundNo为例）：

--(IIf(Trim(Me.FundNoCmboBx.Value) = "", True, .Range("H2:H" & LastRow) = Val(Me.FundNoCmboBx.Value)))

这样当下拉框为空时，该条件自动失效（不限制），不为空时精确匹配数值。

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