如何在Excel中始终更改值的单元格中查找最小值？

Question

单元格a1中的值总是在变化。我想跟踪a2中a1的最小值。这怎么可能？

Answer 1

1. 将A1的值存储在A2中。
2. 执行响应A1中的更改​​的事件。
3. 当事件被触发时，比较A1和A2，如果A1更小，则存储新值。

---

这个假设已经有一个在A2的值：

Private Sub Worksheet_Change(ByVal Target As Range) 
    If Target.Address = "$A$1" Then 
     Dim a2val As Variant 
     Dim a1val As Variant 
     a2val = Range("$A$2").Value2 
     a1val = Range("$A$1").Value2 
     If a1val < a2val Then 
      Range("$A$2").Value2 = a1val 
     End If 
    End If 
End Sub