excel表格怎么使用VBA向其他工作表追加数据?

经常使用vba处理数据，今天我们就来看看使用vba向工作表追加数据的教程，详细请看下文介绍。

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

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

3、在VBA编辑器中插入模块

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

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count=1 And Target.Column > 1 And Column < 7 Then _
 Sheets(Target.EntireColumn.Cells(1, 1).Text).Range("b1048576")
  .End(xlUp).Offset(1, 0)=Target
End Sub

5、在输入区域B2∶G10输入产量数据，该数据自动追加到相关分表中。可以切换到分表验证数据的正确性