插入行/列时运行时错误1004

Question

所以我遇到了可爱的运行时错误1004：应用程序定义或对象定义错误。

它的大概是，VBA中的代码正常运行的时间有一半没有问题，而另一半则是它的表面。第三行（“Mgmt.List .....”）通常在循环中运行，但在这个简单的宏中没有问题。

Sub whyyyy()
    Dim Mgmt As Worksheet
    Set Mgmt = Sheets("Mgmt MarginAnalysis")
    Mgmt.ListObjects("Table4").ListRows.Add (3)
End Sub

该行

Mgmt.ListObjects("Table4").ListRows.Add (3)

是特别的，因为当它在循环中运行时，它有时会在第一次工作，但第二次失败。或者它将彻底失败。

不知道是什么让它起作用，什么不起作用。这刚刚开始发生，工作表/表组合似乎只发生在我刚刚插入的表中（而不是使用VBA）。

Answer 1

您确定Sheets("Mgmt Margin Analysis")有一个名为“Table4”的表。如果您在运行时创建表，很可能，每次创建时都不会为它分配相同的名称（“Table4”）。

请确保在代码中指定此名称，并且不要让Excel为您选择名称。