Bir hücredeki değerin üzerine değer eklemek

[askhamali]

Toplamı yapılacak yeni bir hücre kullanmadan, bir hücredeki değerin üzerine değer eklemek mümkün mü ?

Örnek dosyamda sayfa3 te sorumu örnekledim.

Değerli hocalarıma saygılarımla sunarım.

 

[askhamali]

A sütununa yazdığım değerler manuel girilen değerlerdir. =a1+e1 şeklinde basit toplama formülü ile toplanmaması gerekiyor.

 

[netzone]

Merhaba,

Sorunuzda anlaşılmayan bir durum yok, istediğiniz çözüm makro ile yapılabilir. İlgili arkadaşlar gördüklerinde yardımcı olacaklardır. Sabredip bekleyiniz.

İyi çalışmalar.

 

[Orion1]

A sütununa yazdığım değerler manuel girilen değerlerdir. =a1+e1 şeklinde basit toplama formülü ile toplanmaması gerekiyor.

Dosyanız ektedir.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [E1:E7]) Is Nothing Then Exit Sub
Target.Offset(0, -4).Value = Target.Offset(0, -4).Value + Target.Value
End Sub

 

[askhamali]

Çok teşekkür ediyorum hocam. Önemli bir müşkilimin çözümünü gösterdiniz.

 

[Orion1]

Çok teşekkür ediyorum hocam. Önemli bir müşkilimin çözümünü gösterdiniz.

Rica ederim.
İyi çalışmalar.