Excel 对于循环删除行,循环正在跳过行
我有下面的For循环。它应该删除包含所有Excel 对于循环删除行,循环正在跳过行,excel,vba,Excel,Vba,我有下面的For循环。它应该删除包含所有的行。 它删除行,但当有行与图片类似时,代码将跳过其中一行并删除其中一行 任何人都可以帮助删除包含的连续行吗?这是因为例程的逻辑。例如,如果删除第5行,现在第6行将是第5行,依此类推,因此将不会读取第6行。尝试将列的值设置为空,而不是删除行 Sheets("Stack").Range("C" & row_num + 1).EntireRow = Empty 你会看到所有的行都会被读取 完成后,您可以告诉excel/vba根据一列对矩阵进行程序化
的行。它删除行,但当有行与图片类似时,代码将跳过其中一行并删除其中一行
任何人都可以帮助删除包含
的连续行吗?这是因为例程的逻辑。例如,如果删除第5行,现在第6行将是第5行,依此类推,因此将不会读取第6行。尝试将列的值设置为空,而不是删除行
Sheets("Stack").Range("C" & row_num + 1).EntireRow = Empty
你会看到所有的行都会被读取
完成后,您可以告诉excel/vba根据一列对矩阵进行程序化,这样空行将被组织在最后,也就是说,将成为工作表其余空行的一部分如果删除一行,它们都会向上移动。然后递增并跳过向上移动的最高行。尝试按相反的顺序循环,从max_行到8。@BrianMStafford但接下来如何处理行数
对于最大行到第8行,然后下一个最大行
?尝试对于第8行,步骤-1
@BrianMStafford谢谢bri!
Sheets("Stack").Range("C" & row_num + 1).EntireRow = Empty