excel - 计数包含特定值的单元格

Question

嗨，我是使用 excel 的新手，我想计算包含 500 和 750 之间值的单元格。这是我写的代码，但我做错了，没有给我正确的答案。有人可以帮忙吗？

Sub Count()
    Dim i As Integer
    Dim j As Integer

    Range("C3").Select

    For i = 1 To 279
        For j = 1 To 19
            If i > 500 Then
            ElseIf i <= 750 Then
                i = i + 1
            End If
        Next j
    Next i

    Sheets("Sheet1").Select
    Range("B13").Select
    ActiveCell.Value = i
End Sub

Answer 1

为什么要使用 VBA 呢？

使用COUNTIFS()功能。只需在单元格中输入它B13并将范围调整为A:A您需要在公式中检查的任何范围。

=COUNTIFS(A:A, ">=500", A:A, "<=750")

Answer 2

您的代码只需稍加调整即可工作。

Sub count()
    Dim i As Integer
    Dim j As Integer
    Dim countCell As Integer

    Range("C3").Select

    For i = 1 To 279
        For j = 1 To 19
            If Cells(i, j).Value >= 500 And Cells(i, j).Value <= 750 Then
                countCell = countCell + 1
            End If
        Next
    Next

    MsgBox countCell & " Cells Found", vbInformation

    Sheets("Sheet1").Select
    Range("B13").Select
    ActiveCell.Value = i
End Sub