vba - 继续For循环

Question

我有以下代码:

For x = LBound(arr) To UBound(arr)
  
    sname = arr(x)  
    If InStr(sname, "Configuration item") Then  
        '**(here I want to go to next x in loop and not complete the code below)**  
    End If

    '// other code to copy past and do various stuff

Next x  

我以为我可以简单地使用语句 Then Next x，但这会产生“没有声明 for 语句”错误。

我可以在 If InStr(sname, "Configuration item") Then 之后放置什么以使其继续执行 x 的下一个值？

Answer 1

您可以使用GoTo:

Do

    '... do stuff your loop will be doing

    ' skip to the end of the loop if necessary:
    If <condition-to-go-to-next-iteration> Then GoTo ContinueLoop 

    '... do other stuff if the condition is not met

ContinueLoop:
Loop