|
请教老师,关于数组2中的疑问:
For x = 1 To UBound(arr)
If x = UBound(arr) Then Range(Left(sr, Len(sr) - 1)).Interior.ColorIndex = 3
If arr(x, 1) > 500 Then
sr1 = sr
x1 = x + 1
Do
x = x + 1
Loop Until arr(x, 1) <= 500
sr = sr & "A" & x1 & ":D" & x & ","
If Len(sr) > 255 Then
sr = sr1
x = x1 - 1
Range(Left(sr, Len(sr) - 1)).Interior.ColorIndex = 3
sr = ""
End If
x = x - 1
End If
以上代码的倒数第二句,是不是应该可以去除或者改成x=x+1,
还是以视频中讲到的15行到18行进行说明,在上面的Do循环中,当x=18也就是第19行数据时,结束了DO循环,内存中放的X就等于18,且arr(18,1)本身就是不符条件的,
如x=x-1,则x等于17,arr(17,1)是符合条件的了,所以觉得是不是可以去除这句,或者加1,因为arr(18,1)本身不符合条件可以跳过这一行。
不知道理解的对不对,请老师指教。 |
|