首页 > 解决方案 > 复制时,VBA 代码在 47 个几乎相同的工作表中的 4 个上始终崩溃。为什么?

问题描述

我为我的就业办公室创建了一个表格系统,用于组织志愿者信息和时间表,并按月分隔时间表。当我想添加一个新月份时,我有一个宏,可以将该月的“主”工作表从“主”工作簿复制到所有 47 个不同的工作表中。在其中四张纸上,以下代码崩溃。在剩下的 43 个上,它工作得很好。

sourceBook.Sheets(Array("February, "Events", "Volunteers")).Copy _ After:=destinationBook.Sheets("Volunteers")

with 中的代码也会使相同的工作表崩溃,但不会使其他工作表崩溃。

With sourceBook.Sheets("February").UsedRange destinationBook.Sheets("February").Range("A1").Resize( _ .Rows.Count, .Columns.Count) = .Formula End With

在所有工作表上,二月工作表都不存在,而活动和志愿者则存在。该代码稍后会删除重复项。为什么这个副本的 Excel 只会在其中一些(它们在表面上看起来是相同的)崩溃?如果您需要更多信息,我会提供。

标签: excelvbacopy-paste

解决方案


推荐阅读