新手学习记录丨Excel VBA（1）

准备工作：开启Excel VBA工作环境

在 Microsoft Excel 中，按键 Alt + F11（或者Alt + Fn + F11）即可打开VBA编辑器。如下图所示，右键插入“模块”，即可开始在右侧的编辑器中编辑代码。

实现最基本的任务：打印Hello world

在Excel VBA中，字符串用双引号包围。我们可以使用MsgBox函数输出文本信息。例如，通过如下代码输出"hello world"：

Sub hello()
    MsgBox "hello world"
End Sub

以Sub <例程名>和End Sub包围例程本体。例程名可以是中文或英文。
鼠标光标置于在当前Sub内，按快捷键F5（或Fn + F5）即可运行该例程。上述例程运行结果为弹出信息框，内容为“hello world”，如下图所示。

对单元格对象进行操作：选中及更改属性

选中一个单元格

例如，选中A3单元格：

Sub select_a_cell()
    Range("A3").Select
End Sub

选中多个连续单元格

例如，选中A3:B5范围的单元格：

Sub select_cells()
    Range("A3:B5").Select
End Sub

改变选中单元格的属性

例如，选中A3:B5范围的单元格，并将其字体设置为Times New Roman，字体大小为14pt，字体颜色为蓝色，单元格背景颜色为黄色。可以通过以下的代码实现：

Sub select_and_change()
    Range("A3:B5").Select
    Selection.Font.Name = "Times New Roman"
    Selection.Font.Color = RGB(0, 0, 255) 'blue
    Selection.Font.Size = 14
    Selection.Interior.Color = RGB(255, 255, 0) 'yellow
End Sub

在上述代码中，我们使用Selection表示当前选中的单元格，通过英文句号（.）调整单元格的各项属性。此外，在Excel VBA中，英文单引号（'）后是注释，注意区分英文双引号（"）包围的部分是字符串。

关于单元格对象包含的对象和方法，可参考官方文档。

上述代码中重复引用Selection。为使代码更简洁，可以使用With语句：

Sub select_and_change_with()
    Range("A3:B5").Select   'select the cells

    ' Set the properties
    With Selection
        .Font.Name = "Times New Roman"
        .Font.Color = RGB(0, 0, 255) 'blue
        .Font.Size = 14
        .Interior.Color = RGB(255, 255, 0) 'yellow
    End With

End Sub

保存含VBA代码的Excel文件

最后，保存含VBA代码的Excel文件时，需在保存选项中，选择另存为.xlsm格式。