13、掌握VBA编程：流程控制与事件处理

掌握VBA编程：流程控制与事件处理

1. 代码缩进的重要性

代码缩进能让嵌套层次更清晰。来看下面未缩进的代码示例：

Sub CheckCell()
Dim Msg As String
Select Case IsEmpty(ActiveCell)
Case True
Msg = “is blank.”
Case Else
Select Case ActiveCell.HasFormula
Case True
Msg = “has a formula”
Case False
Select Case IsNumeric(ActiveCell)
Case True
Msg = “has a number”
Case Else
Msg = “has text”
End Select
End Select
End Select
MsgBox “Cell “ & ActiveCell.Address & “ “ & Msg
End Sub

这段代码很难理解，而缩进后的代码会更易读。

2. 循环类型概述

循环是指多次重复执行一段VBA语句。循环分为好的循环和坏的循环。

3. 坏循环示例

下面是一个使用 GoTo 语句的坏循环示例：

Sub BadLoop()
    Dim StartVal As Long
    Dim NumToFill As Long
    Dim CellCount As Lon