随着手机里面功能越来越丰富，让我们使用起来越来越方便了，给我们的生活带来了极大的便利。怎样使用VBA多表数据录入？工具/原料more手机方法/步骤1/5分步阅读

首先在开发工具中打开VBA编辑器

2/5

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

3/5

在VBA编辑器中插入模块

4/5

在模块当中输入如下代码，然后运行

Private Sub CommandButton1_Click() If TextBox1 And TextBox2 And TextBox3 And TextBox4 Then With Sheets(Me.ComboBox1.Value).Range(a1048576).End(xlUp) .Offset(1, 0)=Me.TextBox1 .Offset(1, 1)=Me.TextBox2 .Offset(1, 2)=Me.TextBox3 .Offset(1, 3)=Me.TextBox4 End With Sheets(Me.ComboBox1.Value).Select Range(a2:dRange(a1048576).End(xlUp).Row).Borders.LineStyle=xlContinuous Else MsgBox 所有文本框不能为空！, vbOKOnly+64, 提示 End If TextBox1= TextBox2= TextBox3= TextBox4= TextBox1.SetFocusEnd Sub

5/5

在代码后面输入以下代码，功能是为组合框添加子选项，分别为工作表中所有工作表表名，同时对组合框添加默认显示项目

注意事项

智能手机助理给我们的生活带来了极大的便利！