在excel的一个固定单元格每次输入不同的数字或汉子, 在另外一列中按顺序自动保存每次输入的内容

在excel的一个固定单元格每次输入不同数字或汉子, 在另外一列中按顺序自动保存每次输入的内容,应该就是汇总每次输入的内容

第1个回答  2011-09-16
右键点击表单标签,选中“查看代码”,进入VBA编辑器,在对象框选择worksheet,在过程框选择change,编辑器将自动生成以下宏过程,
Private Sub Worksheet_Change(ByVal Target As Range)

End Sub
在这首尾两行之间输入以下代码(假设固定单元是A1,记录保存在B列):
If Target.Address = Range("a1").Address Then
ta = WorksheetFunction.CountA(Range("b:b"))
If ta = 0 Then
Range("b1").Offset(ta, 0).Value = Target.Value
ElseIf Range("b1").Offset(ta - 1, 0).Value <> Target.Value Then
Range("b1").Offset(ta, 0).Value = Target.Value
End If
End If追问

能再具体点吗 谢谢了

本回答被提问者采纳
第2个回答  2011-09-16
aeeer