在<em>Excel</em>中如何判断VBA循环,达到条件时中止循环-excel while循

for……next循环度如知下道

Sub 循环1()

Dim i%

For i = 1 To [j1].Value

要执行版的代码权

Next

End Sub

do……loop循环如下

Sub 循环2()

Dim i%

Do

要执行的代码

i = i + 1

Loop Until i = [j1].Value

End Sub

1. 启动excel后按Alt+F11启动VBA编辑环境，并zhidao在左侧点击右键→插入→用户窗体。在工具栏中，添加按钮到窗体：
   

   
   

2. 双击按钮，并添加如版下代码

   Private Sub CommandButton1_Click()
       Dim lastRow, i As Long
       With Sheets(1)
           lastRow = Sheets(1).UsedRange.Rows.Count
           For i = 1 To lastRow
               If TextBox1.Text = .Range("A" & i).Value Then
                    .Range("A" & i).Select
                    Exit For
               End If
           Next
       End With
   End Sub

   
   

3. 在VBA中运行窗口，测权试结果为输入10，A列单元格的10被选中：
   

最简单的来两句，不明白请追问~~~

FOR的用法是这百样的：
FOR I=1 TO N
......语句......
NEXT I
这样的功度能回是，使里面的 语句 运行N次，每次I的值都不同，分别是1~N，用来完成固定次数的重复。

IF的用法是这样的：
IF 条件 THEN
.......语句答1.......
ELSE
......语句2......
END IF
这样的功能是判断条件是否满足，如果满足就执行 语句1，否则执行 语句2

以上例子中的语句、语句1、语句2都可以是一个或者多个语句，往往是一段。

你应该用 do until ... loop
按你这样，一上来就不符合了，当然不循环