作者:乔山办公网日期:
返回目录:excel表格制作
打开Excel,进入VBE,新建一个zhidao模块,一个窗体,名称为userform1,输入下列代版码:
sub auto_open()
Application.Visible = False
UserForm1.Show
end sub
在窗体上新建一个按钮为CommandButton1,双击后如入下列代码:
Private Sub CommandButton1_Click()
Unload Me
Application.Visible = True
End Sub
即可权达到你的需求,请给分
详细步骤如下:
1.在VBE界面,双知击“Thisworkbook”
2.此处选择workbook,会自动道出现回两串代码
3.在代码中间,添加上要打开Excel运行答的代码
4.保存并关闭,再打开这个Excel,就会自动弹出VBA界面来了
代码及注释如下:来
在VBE界面左上角sheet3下面源的ThisWorkbook中加入如下代码——
Private Sub Workbook_Open()'选择知事件为工作表打开时触发
Application.Visible = False'将道Excel文件隐藏
UserForm1.Show'像是窗体
End Sub
在VBA中设置打开EXCEL时运行窗体抄按以下方法操作:
1、打开Excel工作簿后,通过点击“开发工具”选项卡的“Visual Basic”按钮或用快捷键“Alt + F11”打开VBE环境。
2、打开VBE环境后,通过点击如图所示的工袭具按钮添加用户窗体。
3、如图所示,设计用户窗体,添加3个文本框,2个Label控件和1个按钮控件。
4、双击窗体上的按钮控件,百在弹出的代码编辑区域添加如图所示的代码。
5、双击资源管理器中的“ThisWorkBook”,如图所示;在度打开的代码编辑环境下,点击“通用”下拉框,选择“WorkBook”,如图所示;在出现的事件过程中添加如图所示的代码——在打开工作簿时自动立即用户窗体的关键代码。
6、将所有文件关闭后,重新打开保存好的.xlsm文件,会发现添加的用户窗体会自动显示出来,如图所示。