
1、在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】。
2、会进入VBA编辑界面!点击工具栏内【插入用户窗体】按钮,在其下拉菜单中,选择【模块】。
3、会d出模块编辑窗口。
4、在代码编辑窗口输入以下代码:sub 关闭文件(),Workbooks("963.xls").Close ture,Workbooks("258.xls").Close,End Sub。
5、在VBA窗口,点击【运行】按钮!即可关闭【963.xls】和【258.xls】两个文件。
6、VBA工程窗口中,这两个文件被关闭不见了。
1、首先第一次打开文件的时候运行窗体,这时会d出close1,close2(关闭工作簿)。2、其次当再一次打开这个文件的时候,重复上述的动作后,这时会d出close1,close2。
3、最后再一次打开窗体,这时候要怎样修改才能一次性关闭窗体和工作部,不会再一次打开这个文件的时候,关闭后会再一次打开窗体。
可用RUN方法来运行其他工作簿的宏来达到控制窗体的目的。(这办法也许不是最好的)例如在工作簿2(“book2”)中有窗体名为
UserForm1
。设一宏代码如下:
Sub
Form_op(ByVal
N
As
Integer)
If
N
=
1
Then
UserForm1.Show
0
'装载并显示窗体
ElseIf
N
=
2
Then
Unload
UserForm1
'关闭窗体
End
If
End
Sub
在另一工作簿中用如下代码打开和关闭窗体:
Run
"book2!form_op",
1
'打开窗体
Run
"book2!form_op",
2
'关闭窗体
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)