Excel 未设置对象变量或带块变量，但我可以'；我找不到问题所在

我是Excel VBA代码的新手，我尝试按如下方式编写代码，但我总是收到错误（附件），您能帮我看看代码中的错误吗

任何帮助都将受到感谢

下面的代码

Sub test_row_count()
    Dim cell As Range
    Dim i As Integer
    Dim sodong As Integer
    sodong = Cells(Rows.Count, 1).End(xlUp).Row

    For i = 1 To sodong
        If cell(i, 2) = "123" Then
            cell(i, 3).Value = "Flag"
        Else
            cell(i, 3).Value = "NONE"
        End If
    Next i
End Sub

---

您声明了一个变量

单元格

，但从未将其设置为任何值

后来您尝试使用该变量，而该变量为null

Sub test_row_count()
    'Dim cell As Range    'Remove this line
    Dim i As Integer
    Dim sodong As Integer
    sodong = Cells(Rows.Count, 1).End(xlUp).Row
   For i = 1 To sodong
        If Cells(i, 2) = "123" Then
                Cells(i, 3).Value = "Flag"   'modify these lines
        Else
                Cells(i, 3).Value = "NONE"   'use Cells not cell
        End If
    Next i
End Sub

---

单元格

已声明但未分配。试图访问它会引发错误。触发错误时，哪一行代码会突出显示？您没有定义

单元格

，可能是想键入

单元格

您从未设置

单元格

以引用任何内容。感谢兄弟，问题已经解决。