SUMIFS语句一直有效,直到应用条件中的数字字段,然后失败

时间:2018-05-23 00:16:09

标签: excel-vba sumifs vba excel

我有一个使用11个标准的sumif语句。它适用于所有带有文本的标准,但是当我添加一个包含空格和/或数字的字段时,它无法工作。我无法弄清楚如何克服这个问题,并希望得到一些帮助。这是我的代码:

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

Dim LastRow As Long

With GS
    LastRow = GS.Range("W1000").End(xlUp).Row
    Me.TGATxtBx.Value = WorksheetFunction.SumIfs(.Range("w2:w" & LastRow),_ 
    .Range("e2:e" & LastRow), "*" & Me.GrantNameCmboBx.Value & "*",_
    .Range("n2:n" & LastRow), "*" & Me.GrantAgencyCmboBx.Value & "*",_ 
    .Range("o2:o" & LastRow), "*" & Me.GrantDeptCmboBx.Value & "*",_ 
    .Range("p2:p" & LastRow), "*" & Me.ProgramCmboBx.Value & "*",_ 
    .Range("d2:d" & LastRow), "*" & Me.ProjTypeCmboBx.Value & "*",_ 
    .Range("r2:r" & LastRow), "*" & Me.CatalogNoCmboBx.Value & "*",_ 
    .Range("q2:q" & LastRow), "*" & Me.PassthroughCmboBx.Value & "*",_
    .Range("s2:s" & LastRow), "*" & Me.GrantIDCmboBx.Value & "*",_ 
    .Range("h2:h" & LastRow), "*" & Me.FundNoCmboBx.Value & "*"_
    .Range("i2:i" & LastRow), "*" & Me.OrgTxtBx.Value & "*",_
    .Range("k2:k" & LastRow), "*" & Me.AccountTxtBx.Value & "*")

Me.PassthroughCmboBx.Value有空白,之后的三个字段有数字。如果我移动一些东西并将这些字段更早地放在有效的标准之间,它就会失败。我真的可以帮到你。

0 个答案:

没有答案