将事件侦听器添加到Excel文本框(失去焦点)

时间:2012-11-26 13:53:56

标签: excel events vba excel-vba textbox

当用户在Excel中使用文本框完成时,我需要触发子命令或命令。

我尝试过使用AfterUpdate()事件和LoseFocus()事件,如下所示:

Public Sub Kommentar_AfterUpdate()

MsgBox ("Hurray")

End Sub

文本框名为Kommentar,位于工作表Radio内。此外,代码应该写在哪里?我已经尝试将它放在无线电表的代码表中,并放在一个单独的模块中。

任何提示,提示或答案都表示赞赏!

1 个答案:

答案 0 :(得分:8)

对于嵌入式ActiveX Excel控件 - 在VBA中的工作表移动中添加以下内容。 TextBox1是控件的名称:

Private Sub TextBox1_LostFocus()


End Sub

对于userform - 使用以下内容,其中Textbox1是文本框的名称:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)


End Sub

如果您不想从文本框中失去焦点,可以将取消bool设置为True。此外,代码放在UserForm>>内。右键单击>>查看代码。