VBA：在

Question

好的，可能是一个简单的，但我刚开始使用这种语言并在这段代码中：

While DATA.Cells(1, i).value & "" <> ""
    If InStr(DATA.Cells(1, i).value, columnName) > 0 Then
        column = i
        Exit While
    End If
    i = i + 1
Wend

看起来这不是使用Exit While的方法吗？那我该怎么办？

Answer 1

While/Wend只能通过GOTO过早退出或退出外部区块Exit sub / function / another exitable loop）

更改为Do循环intead

Do While DATA.Cells(1, i).value & "" <> ""
If InStr(DATA.Cells(1, i).value, columnName) > 0 Then
    column = i
    Exit Do
End If
i = i + 1
Loop

来自@Alex K的原始回答。 Break out of a While...Wend loop in VBA