Excel 在单元格中显示无限重复的值

Question

我的 Excel 电子表格包含一列，其行可以包含值 0、1 或 2。我的 VBA 代码对 0 的数量求和（具体来说，不是 1 或 2 的值）并将计数放入下面的单元格中。这似乎运行没问题，因为末尾单元格的值应该等于 0 的数量，但是数字显示如下（应该只是 9):

数字无限重复。

我的VBA代码：

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("F22")) Is Nothing And Not Intersect(Target, Range("F4:F21")) Is Nothing Then
        Dim count As Integer
        For i = 4 To 21:
            If Not Cells(i, "F").Value = 1 And Not Cells(i, "F").Value = 2 Then
                count = count + 1
            End If
        Next i
        Cells(22, "F").Value = count
    End If
End Sub

这是 VBA 问题还是我的文档格式不正确？

Answer 1

我认为您已将单元格格式化为水平：对齐 Fill。

Excel 在单元格中显示无限重复的值

Excel displaying infinitely repeated value in cell

excel

formatting

vba