Excel VBA运行时错误'；91'；-无法找出发生错误的原因

我想先说一句，我没有真正的VBA经验。我只是研究MicrosoftVBA参考文档，然后从那里一块一块地构建代码。 我创建了一个用户表单来收集输入到表中的数据。我希望能够浏览每个记录并根据需要检索/更新记录，因为信息通常是在多个阶段收集的。 我在以下代码中遇到错误（粗体行出错）：

---

我不知道自己做错了什么，也无法自己排除故障。我一定是误解了什么。

ListRows.Add

返回刚才添加的行，因此您可以在

With

块中直接使用它

Private Sub AddRecord_Click()

    With ActiveSheet.ListObjects("Status").ListRows.Add
         ModifyTableRow .Range
    End with
    
    UpdatePositionCaption
    
End Sub

Private Sub AddRecord_Click()

    With ActiveSheet.ListObjects("Status").ListRows.Add
         ModifyTableRow .Range
    End with
    
    UpdatePositionCaption
    
End Sub