下列中的SumIF值<>“ #NV”

如何解决下列中的SumIF值<>“ #NV”

我的excelsheets看起来像这样：

然后我尝试使用公式：

=SUMIF(B1:B200;B1:B200<>"#NV";B:B)

但是这似乎是错误的。如果每个部分中不是#NV，我想总结所有数字（11111，22222）。每个数字2,3,4,6,9都属于组11111。我想确定分配给组 11111 的所有值的总和。

对于11111：对单元格B2：B6求和，对于22222，对B8：B12求和。那就是我想做的。

希望您能帮助我。如果可以有一个宏，请与我分享您的想法，我将非常感激。谢谢

解决方法

间接英尺阵列公式

强烈建议您将$B:$B的出现范围替换为实际范围，例如$B$1:$B$100
以下两个公式将被复制到C1和D1。第二个是数组公式，如果没有365，则必须使用 CTRL + SHIFT + ENTER 。
这是一个糟糕的解决方案，因为第一个公式使用的是间接函数，该函数是volatile（每次计算后都会更新）函数，第二个公式是数组公式。第二个应该放在第一个而不是D1中，但是它不起作用（我正在使用Excel 2019）。因此，您必须为此使用一个额外的列。也许365可以接受。
希望有人会使用此信息来创建更有效的解决方案。

公式

这两个是您在C1和D1中需要的：

=IF($B2<>"#NV","",SUM(INDIRECT(ADDRESS(D1,2,4)&":"&ADDRESS(ROW(),4))))
=IF($B2<>"#NV",SMALL(IF($B:$B="#NV",ROW($B:$B)-ROW(INDEX($B:$B,1,1))+2),COUNTIF($B$1:$B1,"#NV")))

此计数从B$1到当前行的“ #NV”发生次数。

=COUNTIF(B$1:B6,"#NV")

这是一个数组公式，返回第一次出现“ #NV”之后的行。请注意，下面的行是+2而不是+1，后面的1代表第一次出现。

=IFERROR(SMALL(IF($B:$B="#NV",1),"")

与上一个类似，该数组公式是一个数组，它返回最后一次出现的“ #NV”之后的行。

=IFERROR(SMALL(IF($B:$B="#NV",COUNTIF(B$1:B6,"#NV")),"")

这是SUM / INDIRECT公式：请注意，第一个数字2是要用数组公式替换的数字，而6要替换最后一个ROW公式。

=SUM(INDIRECT(ADDRESS(2,4)&":"&ADDRESS(6,4)))

ROW公式。

=ROW()

请尝试下一个VBA代码。它从B：B填充列范围的错误单元格创建一个范围，并利用不连续范围Areas地址。您没有回答有关连续两次出现此类错误的可能性的问题。无论如何，以下代码也可以处理这种情况。如果没有连续的错误行，则可以简化代码：

Sub testErrorRng()
 Dim sh As Worksheet,rngErr As Range,lastRow As Long,Ar As Range
 Dim startSum As String,endSum As String,i As Long
 
 Set sh = ActiveSheet
 lastRow = sh.Range("B" & rows.count).End(xlUp).row
 Set rngErr = sh.Range("B1:B" & lastRow).SpecialCells(xlFormulas)
 
 For Each Ar In rngErr.Areas
    i = i + 1
    If i = 1 Then
        If Ar.cells.count = 1 Then
            If Ar.Address = "$B$1" Then
                startSum = Ar.Offset(1).Address
            Else
                Ar.Offset(-1,1).Formula = "=Sum(B1:" & Ar.Offset(-1).Address & ")"
                startSum = Ar.Offset(1).Address
            End If
        Else
            startSum = Ar.cells(Ar.cells.count + 1).Address
        End If
    Else
            If Ar.cells.count = 1 Then
                endSum = Ar.Offset(-1).Address
                Ar.Offset(-1,1).Formula = "=Sum(" & startSum & ":" & endSum & ")"
                startSum = Ar.Offset(1).Address
                
            Else
                endSum = Ar.cells(1).Offset(-1).Address
                 Ar.cells(1).Offset(-1,1).Formula = "=Sum(" & startSum & ":" & endSum & ")"
                startSum = Ar.cells(Ar.cells.count + 1).Address                
            End If
    End If
 Next
 If rngErr.Areas(rngErr.Areas.count).row < lastRow Then
    endSum = sh.Range("B" & lastRow).Address
    sh.Range("C" & lastRow).Formula = "=Sum(" & startSum & ":" & endSum & ")"
 End If
End Sub

请对其进行测试并发送一些反馈。

已编辑：

没有连续错误行的更短版本：

Sub testErrorRngSimple()
 Dim sh As Worksheet,i As Long
 
 Set sh = ActiveSheet
 lastRow = sh.Range("B" & rows.count).End(xlUp).row
 Set rngErr = sh.Range("B1:B" & lastRow).SpecialCells(xlFormulas)
 
 For Each Ar In rngErr.Areas
    i = i + 1
    If i = 1 Then
        If Ar.Address = "$B$1" Then
            startSum = Ar.Offset(1).Address
        Else
            Ar.Offset(-1,1).Formula = "=Sum(B1:" & Ar.Offset(-1).Address & ")"
            startSum = Ar.Offset(1).Address
        End If
    Else
        endSum = Ar.Offset(-1).Address
        Ar.Offset(-1,1).Formula = "=Sum(" & startSum & ":" & endSum & ")"
        startSum = Ar.Offset(1).Address
    End If
 Next
 If rngErr.Areas(rngErr.Areas.count).row < lastRow Then
    endSum = sh.Range("B" & lastRow).Address
    sh.Range("C" & lastRow).Formula = "=Sum(" & startSum & ":" & endSum & ")"
 End If
End Sub

下列中的SumIF值<>“ #NV”

如何解决下列中的SumIF值<>“ #NV”

解决方法

间接英尺阵列公式

相关推荐