第1个回答 2019-04-20
VBA 中的worksheet_change 事件
假设在sheet1的 A1单元格输入数据,自动逐行记录在sheet2 B列!
选中sheet1工作表标签---右键--查看代码---吧下列代码复制进去,关闭VB编辑器。SHEET1 A1输入结束,会自动罗列到sheet2的B列!
Private Sub Worksheet_Change(ByVal Target As Range)
N = Sheets("sheet2").[b65536].End(3).Row + 1
If Target.Address = "$A$1" Then
Sheets("sheet2").Cells(N, "b") = Target
End If
End Sub本回答被网友采纳