我在寻找有关快速删除中等大小数据集的三分之二的见解。目前,我正在将空格分隔的数据从文本文件导入到Excel中,并且我正在使用循环逐行删除数据。循环从数据的最底行开始,并删除上行。数据按时间顺序排列,我不能简单地砍掉数据的前三分之二或三分之二。基本上,发生的情况是数据被过度采样,太多的数据点彼此靠得太近。这是一个非常缓慢的过程,我只是在寻找另一种方法。使用VBA删除每个第2和第3行
Sub Delete()
Dim n As Long
n = Application.WorksheetFunction.Count(Range("A:A"))
Application.Calculation = xlCalculationManual
Do While n > 5
n = n - 1
Rows(n).Delete
n = n - 1
Rows(n).Delete
n = n - 1
Loop
Application.Calculation = xlCalculationAutomatic
End Sub
另外,我看着多选择所有感兴趣的行中循环,执行与一行代码中删除所有行的选择后,却无法弄清楚一种做法。我会认为这可能会增加整体计算时间。 – Jesse