对象'表'的方法'复制'失败
重新安装Office 2013后,我得到这个错误:
运行时错误“-21474178848(80010108)”:
对象'表'的方法'复制'失败
在这个代码块中:
Set ThisWork = ActiveWorkbook strExt = ThisWork.Sheets("Catalog1").Cells(2, 4).Value & "_" & Format(Now, "yyyy_mm_dd_hhmmss") strSaveName = ThisWork.Path & "\" & strExt & ".xlsx" ThisWork.Sheets(Array("Catalog1", "Catalog2", "Translations")).Copy With ActiveWorkbook ...
按下debugging并按继续( F5 )后,Excel崩溃。
为什么会这样呢?
检查VBA Windows中的表格名称
在你的情况下,可能错误的名称(名称)部分取决于Excel本地化。 尝试更改(名称)值,您可能有sheet1或sheet2,并将其更改为Catalog1或Catalog2,因此乳清必须多名称部分。
所以,现在你可能有
Sheet1 (Catalog1) Sheet2 (Catalog2)
你必须重命名为
Catalog1 (Catalog1) Catalog2 (Catalog2)