我似乎无法得到我的第二个循环的权利。我正在寻找价值“Persoonlijke prijslijst”的单元格。一旦我有这个单元格,我需要上去两个,然后删除8个单元格。当我调试时,它说temp = 0,所以我认为它在我的第二个循环。Excel VBA - 循环变量
Dim i As Integer
For i = 1 To 800
Range("C" & i).Select
If Range("C" & i).Value = "Persoonlijke prijslijst" Then
Dim temp As Integer
For temp = i - 2 To temp + 8
Range("C" & temp).EntireRow.Delete Shift:=xlToLeft
Next temp
End If
Next i
你的意思上去的两行,然后从那里删除8行了吗? – 2012-03-14 15:03:58
是的,这是正确的 – CustomX 2012-03-14 15:06:49
这是因为你正在删除行内的第二个循环。每次删除一行时,临时变量也需要更新。但最好是以凯尔的方式去做。 – mattboy 2012-03-14 15:27:18