Dzwebs.Net

撰写电脑技术杂文十余年

VBA操作Excel用户窗体的常见代码

Admin | 2010-12-6 8:28:05 | 被阅次数 | 18435

温馨提示!

如果未能解决您的问题,请点击搜索;登陆可复制文章,点击登陆

  ①显示用户窗体

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

  UserFormName.Show

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

  UserForm1.Show

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

  Load UserForm1

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

  ②如何临时隐藏用户窗体

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

  UserForm1.Hide

  ③从内存中删除用户窗体

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

  Unload UserForm1

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

  Unload Me

  ④使用用户窗体事件

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

  请注意 Visual Basic 模块包含事件的过程可能被称为"隐藏"用户窗体的模块。 看 Microsoft Project Explorer 窗口的 Visual Basic 编辑器的 Modules 集合中不包含事件过程的模块。 您必须双击用户窗体可以查看用户窗体的主体代码模块。

  ⑤捕获用户窗体事件

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

  在 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 = "Events Events Events!"
  Me.BackColor = RGB(10, 25, 100)

  End Sub

  Private Sub UserForm_Resize()

  msg = "Width: " & Me.Width & Chr(10) & "Height: " & Me.Height

  copyright vbacn

  MsgBox prompt:=msg, Title:="Resize Event"

  End Sub


  Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

  msg = "Now Unloading " & Me.Caption
  MsgBox prompt:=msg, Title:="QueryClose Event"

  End Sub

  Private Sub UserForm_Terminate()

  msg = "Now Unloading " & Me.Caption
  MsgBox prompt:=msg, Title:="Terminate Event"

  End Sub


该杂文来自: Excel杂文

上一篇:Excel按钮代码Unload Me编译错误无效使用Me关键字

下一篇:给带有公式的单元格着上颜色

网站备案号:

网站备案号:滇ICP备11001339号-7

版权属性:

Copyright 2007-2021-forever Inc. all Rights Reserved.

联系方式:

Email:dzwebs@126.com QQ:83539231 访问统计