Excel使用VBA计算范围中的值是否满足特定条件

Question

我有两个excel范围，比如说：

x   |    y
------------
 5  |   -1
46  |   -4
 2  |    1
67  |   -1
22  |    1
 6  |    0
34  |    0
 7  |   -2

我想要仅在第一列中的相应值小于10时计算小于O的值的第二列的sum(y(i)即，对于i<0且x(i)<10 sum(y(i) ）。因此，这种情况下，总和将为-3。

Answer 1

假设您的标题位于A1：B1并且您的数据是A2：B9使用此：

=SUMIFS(B2:B9,A2:A9,"<10",B2:B9,"<0")

Answer 2

尝试类似的东西

Function calc() AS Integer

    Dim sum AS Integer: sum = 0
    Dim c AS Range

    For Each c In ThisWorkbook.Worksheets(1).Range("A1:A15")
        If c.Value < 10  And c.Offset(0, 1).Value < 0 Then
            sum = sum + c.Offset(0, 1).Value
        End If
    Next c

    calc = sum

End Function