怎样使用VBA文本框输入完毕后自行执行命令?
来源:网络收集 点击: 时间:2024-02-23首先在开发工具中打开VBA编辑器

在单元格区域当中输入一些内容作为例子

在VBA编辑器中插入模块

在模块当中输入如下代码,然后运行
Private Sub TextBox3_KeyDown(ByVal KeyCode As MSForms.ReturnInteger,ByVal Shift As Integer)If KeyCode=vbKeyReturn ThenActiveSheet.Range(A1)=姓名 ActiveSheet.Range(B1)=手机号 ActiveSheet.Range(C1)=地址 Range(A1048576).End(xlUp).Offset(1, 0)=Me.TextBox1: TextBox1= Range(B1048576).End(xlUp).Offset(1, 0)=Me.TextBox2: TextBox2= Range(C1048576).End(xlUp).Offset(1, 0)=Me.TextBox3: TextBox3= End IfEnd Sub

用快捷键F5运行窗体,在文本框中输入朋友通讯录信息后按Enter键,光标跳到第二个文本框,第二个文本框中输入后光标跳至第三个文本框,在第三个文本框中输入完毕后程序将三个框中的信息输出到工作表中,同时清空三个文本框,光标跳转至第一个文本框等待输入下一条信息,如图

智能手机助理给我们的生活带来了极大的便利!
版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.ff371.cn/art_122346.html