摘要：Sub 标记空行Dim r As Integerr = 1 ' 从第1行开始' 循环直到遇到空单元格Do While Cells(r, 1).Value ""If WorksheetFunction.CountA(Rows(r)) = 0 ThenRow
在Excel自动化领域，VBA循环是处理重复性任务的超级引擎。掌握循环技巧，能让你的工作效率提升十倍！下面通过实战案例，带你深入理解VBA循环的威力。
最适合处理Excel对象集合（如工作表、单元格区域等）：
Sub 批量重命名工作表Dim ws As WorksheetDim i As Integeri = 1' 遍历所有工作表For Each ws In ThisWorkbook.Worksheetsws.Name = "数据表_" & i ' 新名称格式i = i + 1Next wsMsgBox "所有工作表重命名完成！"End Sub关键点：For Each循环自动处理集合中的每个元素，无需手动计数，代码简洁高效。
当处理不确定行数的数据时特别有效：
Sub 标记空行Dim r As Integerr = 1 ' 从第1行开始' 循环直到遇到空单元格Do While Cells(r, 1).Value ""If WorksheetFunction.CountA(Rows(r)) = 0 ThenRows(r).Interior.Color = RGB(255, 200, 200) ' 标记空行End Ifr = r + 1LoopMsgBox "空行标记完成！"End Sub需要精确控制循环次数时的首选：
Sub 创建月度工作表Dim i As Integer' 创建12个月的工作表For i = 1 To 12Sheets.Add After:=Sheets(Sheets.Count)ActiveSheet.Name = Format(DateSerial(Year(Date), i, 1), "yyyy-mm")Next i' 添加目录页Sheets.Add Before:=Sheets(1)ActiveSheet.Name = "目录"For i = 1 To 12Cells(i, 1).Value = Sheets(i + 1).NameCells(i, 1).Hyperlinks.Add Anchor:=Cells(i, 1), Address:="", SubAddress:="'" & Sheets(i + 1).Name & "'!A1"Next iEnd Sub提前退出循环：使用Exit For或Exit Do提升效率For i = 1 To 1000If Cells(i, 1).Value = "停止" ThenExit For ' 找到目标立即退出End IfNext i嵌套循环处理二维数据For row = 1 To 10For col = 1 To 5Cells(row, col).Value = row * col ' 创建乘法表Next colNext row禁用屏幕刷新加速循环Application.ScreenUpdating = False ' 开始循环前关闭刷新'...执行循环操作...Application.ScreenUpdating = True ' 结束后恢复Sub 数据清洗Dim lastRow As LongDim i As LongApplication.ScreenUpdating = FalselastRow = Cells(Rows.Count, 1).End(xlUp).Row' 从最后一行向上遍历（避免删除行导致的错位）For i = lastRow To 2 Step -1' 删除空行If IsEmpty(Cells(i, 1)) ThenRows(i).Delete' 清除错误值ElseIf IsError(Cells(i, 2)) ThenCells(i, 2).ClearContents' 格式化日期ElseIf IsDate(Cells(i, 3)) ThenCells(i, 3).NumberFormat = "yyyy-mm-dd"End IfNext iApplication.ScreenUpdating = TrueMsgBox "数据清洗完成！共处理 " & lastRow & " 行数据"End Sub重要提醒：循环中删除行时务必从下往上遍历（使用Step -1），否则会导致索引错位！
掌握这些循环技巧，你将能轻松应对：
✅ 批量数据处理
✅ 报表自动生成
✅ 数据清洗转换
✅ 系统自动化操作
循环结构是VBA自动化的脊梁。通过本文的实战案例，你已经获得了处理Excel重复任务的强大能力。立即动手尝试这些代码，开启你的高效办公之旅吧！
Tips：每个高效的VBA程序背后，都有一个精心设计的循环引擎。
来源：凡妈小厨房
