文本框是一个空字段,用户可以在其中填写一段文本。要在Excel VBA中创建一个文本框,请执行以下步骤。
1.在“ 开发人员”选项卡上,单击“插入”。
2.在“ ActiveX控件”组中,单击“文本框”。
3.在工作表上拖动一个命令按钮和一个文本框。
4.右键单击命令按钮(确保已选择“设计模式”)。
5.单击查看代码。
注意:您可以通过右键单击控件(确保已选择“设计模式”),然后单击“属性”来更改控件的标题和名称。将命令按钮的标题更改为“导入数据”。现在,我们将保留TextBox1作为文本框的名称。
6.添加以下代码行:
TextBox1.Text =“数据导入成功”
7.单击工作表上的命令按钮(确保取消选择“设计模式”)。
结果:
8.要清除文本框,请使用以下代码行:
TextBox1.Value =“”
注意:尽管在某些情况下将文本框直接放置在工作表上可能会很有用,但将文本框放置在Userform上特别有用。