窗体主要是为了做交互界面,VBA里已经做好了一些可以直接添加到窗体上的控件:
工具箱上的是一些常用控件,一般情况下都足够使用了,右键点击工具箱,会有个附加控件的东西,打开后可以看到,在工具箱上的是已经被勾选了的,这里可以有更多的选择。
这里的控件其实和前面说过的ActiveX控件是一种东西,使用方法也类似。
最常用的一个控件应该是命令按钮,拖拽一个到窗体,然后双击按钮就可以进入代码编辑,默认就会添加单击事件:
代码语言:javascript复制Private Sub CommandButton1_Click()
End Sub
我们实现一个简单的功能:
新建一个Excel,默认有三个Sheet,名称分别为Sheet1、Sheet2、Sheet3。
在VBA编辑器插入一个窗体,添加3个命令按钮,选中按钮,在属性窗口修改Caption属性分别为Sheet1、Sheet2、Sheet3,编辑代码:
代码语言:javascript复制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
在普通模块编辑代码:
代码语言:javascript复制Sub TestUserFrom()
UserForm1.Show
End Sub
运行后:
这样就完成了一个简单的交互界面,点击窗体上的按钮,可以分别激活对应的工作表。