清除内容失败

时间:2017-10-05 19:32:17

标签: vba

我为宏编写了一些VBA代码,它从工作簿中复制一张工作表,将此工作表的内容粘贴到当前工作簿(包含宏的工作簿)中,然后执行许多不同的操作来清理数据。清理完数据后,我会运行一行清除目标表单的内容,然后将代码写入当前表单的内容(包含已清理的数据)并将其粘贴到此目标表单上。我遇到的问题是clear contents命令不断拉出错误。这个宏已经存在好几个月了,直到几天前我才开始遇到这个问题,我无法弄清楚发生了什么。任何帮助都会被贬低。

Worksheets("DEMAND").Range("A1:CZ500").ClearContents
        'This line ^^^ is where the code is breaking. 
Worksheets("DEMAND0").Range("A1:CZ500").Copy
Worksheets("DEMAND").Range("A1").PasteSpecial xlPasteValues

0 个答案:

没有答案