窗体UserForm——命令按钮

窗体主要是为了做交互界面，VBA里已经做好了一些可以直接添加到窗体上的控件：

工具箱上的是一些常用控件，一般情况下都足够使用了，右键点击工具箱，会有个附加控件的东西，打开后可以看到，在工具箱上的是已经被勾选了的，这里可以有更多的选择。

这里的控件其实和前面说过的 ActiveX控件 是一种东西，使用方法也类似。

最常用的一个控件应该是命令按钮，拖拽一个到窗体，然后双击按钮就可以进入代码编辑，默认就会添加单击事件：

Private Sub CommandButton1_Click()
End Sub

我们实现一个简单的功能：

新建一个Excel，默认有三个Sheet，名称分别为Sheet1、Sheet2、Sheet3。

在VBA编辑器插入一个窗体，添加3个命令按钮，选中按钮，在属性窗口修改Caption属性分别为Sheet1、Sheet2、Sheet3，编辑代码：

Private Sub CommandButton1_Click()
    Worksheets("Sheet1").Activate
End Sub
Private Sub CommandButton2_Click()
    Worksheets("Sheet2").Activate
End Sub
Private Sub CommandButton3_Click()
    Worksheets("Sheet3").Activate
End Sub

在普通模块编辑代码：

Sub TestUserFrom()
    UserForm1.Show
End Sub

运行后：