excel-vba 删除循环中的行或列
示例
如果要删除循环中的行(或列),则应始终从范围的末尾开始循环并在每一步中都移回。如果使用代码:
Dim i As Long
With Workbooks("Book1").Worksheets("Sheet1")
For i = 1 To 4
If IsEmpty(.Cells(i, 1)) Then .Rows(i).Delete
Next i
End With您会错过一些行。例如,如果代码删除了第3行,则第4行变为第3行。但是,变量i将更改为4。因此,在这种情况下,代码将丢失一行并检查另一行,而该行以前不在范围内。
正确的代码是
Dim i As Long
With Workbooks("Book1").Worksheets("Sheet1")
For i = 4 To 1 Step -1
If IsEmpty(.Cells(i, 1)) Then .Rows(i).Delete
Next i
End With
热门推荐
1 如何训练狗狗不叫
2 训练狗狗不叫
3 训练狗狗随行
4 怎么训练狗狗不叫
7 训练比熊狗狗教程
10 上海狗狗训练
11 怎么训练狗狗上厕所
12 训练狗狗趴下
13 狗狗服从训练
14 训练狗狗拒食
15 训练狗狗笑
16 训练狗狗大便
17 训练狗狗立
18 训练狗狗捡东西