第一范文网 - 专业文章范例文档资料分享平台

Excel_VBA用户窗体常用的方法

来源:用户分享 时间:2025/5/25 16:29:58 本文由loading 分享 下载这篇文档手机版
说明:文章内容仅供预览,部分内容可能不全,需要完整文档或者需要复制内容,请下载word后使用。下载word有问题请添加微信号:xxxxxxx或QQ:xxxxxx 处理(尽可能给您提供完整文档),感谢您的支持与谅解。

Excel_VBA用户窗体常用的方法

Excel VBA用户窗体常用的方法

2009-06-20 23:40

1、显示用户窗体

用于以编程方式显示用户窗体的语法就是: UserFormName、Show

若要显示用户窗体名为 UserForm1,使用以下代码: UserForm1、Show

时可以加载到内存用户窗体而不实际显示它。 可能需要复杂的用户窗体几秒钟才显示。 可以预用户窗体加载到内存中,因为您可以决定何时引发此开销。 但不显示加载到内存的 UserForm1,使用以下代码: Load UserForm1

您必须使用 Show 方法时以前显示的。

2、如何临时隐藏用户窗体

如果想要临时隐藏用户窗体,请使用 隐藏 方法。 可以隐藏用户窗体,如果您的应用程序涉及用户窗体之间移动。 若要隐藏用户窗体,使用以下代码: UserForm1、Hide

3、如何从内存中删除用户窗体

要从内存中删除用户窗体使用在 卸载 语句。 若要卸载一个名为 UserForm1 用户窗体,使用以下代码: Unload UserForm1

如果卸载与用户窗体或与用户窗体上的控件相关联的事件过程中用户窗体 (例如,您单击CommandButton 控件),您可以使用\关键字而不就是用户窗体的名称。 要使用\关键字卸载用户窗体,使用以下代码: Unload Me

4、如何使用用户窗体事件

用户窗体支持许多预定义的事件,您可以将附加 VBA 过程。 在事件发生时, 该过程附加到该事件就会运行。 由用户执行的单个操作可以启动多个事件。 最频繁用户窗体使用的事件包括 Initialize 事件、 Click 事件与 终止 事件。

请注意 Visual Basic 模块包含事件的过程可能被称为\隐藏\用户窗体的模块。 瞧

Microsoft Project Explorer 窗口的 Visual Basic 编辑器的 Modules 集合中不包含事件过程的模块。 您必须双击用户窗体可以查瞧用户窗体的主体代码模块。

Excel_VBA用户窗体常用的方法

5、如何捕获用户窗体事件

要捕获用户窗体事件,请按下列步骤操作:

在 Excel 中创建一个新工作簿。

在 工具 菜单上指向 宏 ,然后单击 Visual Basic 编辑器 。 在 插入 菜单中上, 单击用户窗体插入您的工作簿的 用户窗体 。 双击 用户窗体 的用户窗体中显示代码窗口。 在模块中键入以下代码:

Private Sub UserForm_Click() Me、Height = Int(Rnd * 500) Me、Width = Int(Rnd * 750) End Sub

Private Sub UserForm_Initialize()

Me、Caption = \ Me、BackColor = RGB(10, 25, 100) End Sub

Private Sub UserForm_Resize()

msg = \、Width & Chr(10) & \、Height copyright vbacn

MsgBox prompt:=msg, Title:=\End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) msg = \、Caption

MsgBox prompt:=msg, Title:=\End Sub

Private Sub UserForm_Terminate()

msg = \、Caption

MsgBox prompt:=msg, Title:=\End Sub

搜索更多关于: Excel_VBA用户窗体常用的方法 的文档
Excel_VBA用户窗体常用的方法.doc 将本文的Word文档下载到电脑,方便复制、编辑、收藏和打印
本文链接:https://www.diyifanwen.net/c0v76506ckl2xn8u9whcj4n25q6nxtf004f0_1.html(转载请注明文章来源)
热门推荐
Copyright © 2012-2023 第一范文网 版权所有 免责声明 | 联系我们
声明 :本网站尊重并保护知识产权,根据《信息网络传播权保护条例》,如果我们转载的作品侵犯了您的权利,请在一个月内通知我们,我们会及时删除。
客服QQ:xxxxxx 邮箱:xxxxxx@qq.com
渝ICP备2023013149号
Top