【VBA编程】VBA基础语法（二）

一、VBA中的内置函数      

        合理使用函数不但可以节省处理数据的时间，提高工作效率还可以降低编程的难度，减少编写代码的工作量。

例如想知道当前系统时间：

Sub NowTime()
    MsgBox "现在的时间是：" & Time()  'Time函数返回房前系统时间
End Sub

可以在Excel工作薄中发的帮助中找到函数。

也可以在VBE代码窗口敲VBA.后，系统会自动显示函数列表供选择

二、VBA的基本语句结构

 1、条件选择：If......Then

If 条件语句 Then 条件为真的结果
If 条件语句 Then 条件为真的结果  Else 条件为假的结果

奇技淫巧：在代码窗口，将光标定位在程序的中间，可以按F8健逐句执行语句观察程序的执行情况。

2、多条件选择：ElseIf

If 条件语句1 Then 
    条件语句1为真的结果
ElseIf 条件语句2 Then
    条件语句2为真的结果
Else
    条件为假的结果
End if   'End If 表示写成快的If语句结束了，写程快必须以它结尾

3、更为合适的多条件选择语句：Select Case

Select Case 测试表达式
    Case 表达式列表1
        为真的结果
    Case 表达式列表2
        为真的结果
    Case Else   '是可选语句
        为假的结果
End Select  '结束语句，必不可少

4、循环语句：For......Next

For 循环变量 = 初值 to 终值 [Step 步长]  
    循环执行体
    [Exit For] '中途退出循环的语句
    循环执行体
Next [循环变量]

5、循环语句：Do While

'1、逻辑表达式在前
Do [While 逻辑表达式]
    循环体
    [Exit Do]  可选语句，跳出循环
    循环体
Loop '截数语句，返回Do语句处，再次判断循环条件

'2、逻辑表达式在后
Do 
    循环体
    [Exit Do]  可选语句，跳出循环
    循环体
Loop [While 逻辑表达式]

6、循环语句：Do Until

'1、逻辑表达式在前
Do [Until 逻辑表达式]
    循环体
    [Exit Do]  可选语句，跳出循环
    循环体
Loop '截数语句，返回Do语句处，再次判断循环条件

'2、逻辑表达式在后
Do 
    循环体
    [Exit Do]  可选语句，跳出循环
    循环体
Loop [Until 逻辑表达式]

7、循环语句：For Each......Next

For Each 元素变量 In 集合名称或数组名称
    语句块1
    [Exit For]
    [语句块2]
Next [元素变量]

注意：1、执行跳转：GoTo语句                2、With 语句，省略重复的代码