maksimumu hatırda tutma

[a.bahsi]

bir hücrede "örnek a2 hücresinde" değerler başka hücreler bağlı olarak değişmektedir.yapmak istediğim başka bir hücrede mesela a3 hücresinde" a2 hücresinde olan değer artarsa buraya yazması ve hatırda tutması.eğer a2 hücresi düşerse önceki yüksek değer a3 de sabit kalsın .ne zaman a2 hücresi son maksimum değeri geçerse a3 atasın kod kısmını bilmiyorum bu yüzden kod olmazsa daha iyi olur

 

[YUSUF44]

Bu işlem formülle yapılamaz diye biliyorum çünkü formüller anlık olarak çalışır, eskiyi hatırlamazlar. Gördüğüm tüm örnekler ve çözümler de makro ile yapılmıştır.

Kod yani makro ile çözüm için de A2 hücresinin neye göre değiştiğini bilmek gerekir. Yani A1 hücresini elle değiştirdiğinizde A2 hücresi formülle değiştiriliyorsa makroda A1 hücresinin değişimine bağlı olarak kod yazılabilir.

Örneğin aşağıdaki kodu ilgili sayfanın kod bölümüne (sayfa adına sağ tıklayıp kod görüntüle deyince açılan sayfaya) yapıştırırsanız A1 hücresi değiştiğinde A2 ve A3 hücresini karşılaştırır, büyük olanı A3 hücresine yazar:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [A1]) Is Nothing Then Exit Sub
[A3] = WorksheetFunction.Max([A2], [A3])
End Sub