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