文本输入 Excel VBA 上的文本框文本消失 - 第 2 部分

Posted 2023-03-27

【中文标题】文本输入 Excel VBA 上的文本框文本消失 - 第 2 部分

【英文标题】：Textbox Text Disappear on Text Entry Excel VBA - Part 2

【发布时间】：2016-07-13 16:55:16

【问题描述】：

我有一个文本框1，它在定义的范围内搜索匹配值，并在按下 Enter 或命令按钮 4 时转到该单元格。我想要做的是让 Textbox1 默认显示“请输入搜索条件”，当用户键入一个值时它会清除，并在操作完成时返回。下面的链接包含我正在寻找的所有内容，但我没有使用用户表单。我的 textbox1 和 Button4 是 sheet1 上的控件。我已经尝试了几个小时的一些想法，但似乎无法实现。

Textbox Text Disappear on Text Entry Excel VBA

任何指导都将受到赞赏！

【参考方案1】：

使用工作表的激活事件而不是用户表单事件。拉左下拉选择工作表对象，然后拉右下拉选择事件。为此，您需要在项目资源管理器中双击工作表。

【讨论】：

我继续在 Activesheet.button4.setfocus 处得到一个对象不支持此属性或方法。

使用激活而不是 SetFocus。 ThisWorkbook.Worksheets(1).CommandButton1.Activate