如何在Excel VBA工作表功能中添加多个SUMIFS

时间:2018-11-21 18:38:31

标签: excel vba excel-vba sumifs

我正在尝试在VBA工作表函数中创建与excel中以下内容相同或相似的形式形式。

"=sumifs(U:U,O:O,"TEXT",Q:Q,"TEXT1")+sumifs(U:U,O:O,"TEXT",Q:Q,"TEXT2")"

我目前有

myanswer = Application.WorksheetFunction.SumIfs(Range("U:U"), Range("O:O"), "TEXT", Range("Q:Q"), "TEXT1")

如果我添加更多内容,例如

Application.WorksheetFunction.SumIfs(Range("U:U"), Range("O:O"), "TEXT", Range("Q:Q"), "TEXT1")+***Application.WorksheetFunction.SumIfs(Range("U:U"), Range("O:O"), "TEXT", Range("Q:Q"), "TEXT2"***)

它给出了一个错误(我在***之间突出显示了停止工作的部分。我确定这里有一个简单的“ and”或“ or”功能,但我的大脑现在fr不安。请让我知道您是否需要任何说明(也是否有打字错误,我必须将其翻译成另一台计算机上的代码)。

1 个答案:

答案 0 :(得分:1)

这对我有用。我只是作为回答来显示格式,包括换行符(不是必需的,但使代码更易于阅读)

MsgBox Application.WorksheetFunction.SumIfs(Range("U:U"), Range("O:O"), "TEXT", Range("Q:Q"), "TEXT1") _
    + Application.WorksheetFunction.SumIfs(Range("U:U"), Range("O:O"), "TEXT", Range("Q:Q"), "TEXT2")