vba - 范围类的 1004 复制方法失败，较小的数据集上不存在错误

Question

我有一个“切碎”电子表格的宏，允许用户选择他们想要保留的列。以及用于过滤值和日期范围的列的选择标准。

宏工作正常，但是当我尝试处理一个 190MB 的文件时，我得到了一个

错误：1004 范围类的复制方法失败

它失败的那一行是：

Selection.SpecialCells(xlCellTypeVisible).Copy Destination:=Export.Sheets("Sheet1").Range("A1")

我已经尝试将代码拆分，但仍然无法正常工作。（见下文）

Selection.SpecialCells(xlCellTypeVisible).Copy Export.Sheets("Sheet1").Range("A1").Select Export.Sheets("Sheet1").Range("A1").Paste

完整文件可以在这里找到： https ://quickfileshare.org/9th/Big_Choppa_-_V4_JB1_Test.xlsm

标签： vbaexcel