如果单元格值大于同一单元格的上一个值,则使用Excel
我想给A1加一个值,当我改变A1时,我想把第一个输入的值保留在另一个单元格中 那可能吗如果单元格值大于同一单元格的上一个值,则使用Excel,excel,cell,Excel,Cell,我想给A1加一个值,当我改变A1时,我想把第一个输入的值保留在另一个单元格中 那可能吗 谢谢在工作表区域插入以下事件宏: Private Sub Worksheet_Change(ByVal Target As Range) Dim A As Range, N As Long Set A = Range("A1") If Intersect(Target, A) Is Nothing Then Exit Sub If Cells(1, 2).Value = ""
谢谢在工作表区域插入以下事件宏:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim A As Range, N As Long
Set A = Range("A1")
If Intersect(Target, A) Is Nothing Then Exit Sub
If Cells(1, 2).Value = "" Then
N = 1
Else
N = Cells(1, 2).End(xlUp).Row + 1
End If
Application.EnableEvents = False
A.Copy Cells(N, "B")
Application.EnableEvents = True
End Sub
每次在A1中输入值时,该值将记录在B列的第一个可用单元格中
由于它是工作表代码,因此安装和自动使用非常容易:
必须启用宏才能工作这里是一个仅使用公式的解决方案。它要求您在Excel选项中打开迭代计算。 您可以将其设置为1次迭代 您只需在B1中输入以下公式:
=IF(ISBLANK(C1),IF(ISBLANK(A1),B1,IF(B1="",A1,B1)),"")
A1是要记忆其值的单元,B1是记忆位置,C1是复位按钮
- 只要C1为空,B1就会保存输入的第一个值 A1李>
- 当您在C1中输入任何值时,B1将变为空并在中被阻止 这个州李>
- 然后可以删除C1的内容,B1将再次响应。它将“捕获”当前的第一个值A1并将其保留,直到您再次重置它李>