求高手解决，如何EXCLE中在相同的位置粘贴不同的值，在另外一张表上累积显示之前的所有粘贴内容？！

假定Sheet1是原始表，Sheet2是输出表，在Sheet1插入如下VBA程序：
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("A1:C1").Address Then
If Sheet2.Range("A65536").End(xlUp).Row() = 1 And Sheet2.Range("A1").Value = "" And Sheet2.Range("B1").Value = "" And Sheet2.Range("C1").Value = "" Then
Sheet2.Range("A65536").End(xlUp).Offset(0, 2).Value = Range("C1").Value
Sheet2.Range("A65536").End(xlUp).Offset(0, 1).Value = Range("B1").Value
Sheet2.Range("A65536").End(xlUp).Offset(0, 0).Value = Range("A1").Value
Else
Sheet2.Range("A65536").End(xlUp).Offset(1, 2).Value = Range("C1").Value
Sheet2.Range("A65536").End(xlUp).Offset(1, 1).Value = Range("B1").Value
Sheet2.Range("A65536").End(xlUp).Offset(1, 0).Value = Range("A1").Value
End If
End If
End Sub

1、在Sheet2工作表A1单元格中输入公式：=Sheet1!A1，再用下拉复制的方法覆盖数据区域。
2、在Sheet1工作表中粘贴数据，Sheet2工作表的相同单元格则会显示Sheet1工作表粘贴的内容
你试试看！