Girilen Sayının Bulunduğu Sütunundaki Sayıların Toplamını Al

[baydeniro]

Merhaba Arkadaşlar,

D-E-F sütunlarına yazılan verinin A sütununda tanımlı verinin bulunduğu 1. veya 2. veya 3. satırdaki veri ile eşleşiyorsa o aynı sütundaki toplamı güncellemesi, sonra G sütunundaki toplamı güncellemesi mümkün mü !
dosya içinde detaylı bilgi bulunmaktadır

Örnek dosya linki : https://yadi.sk/i/uqC2wgOIwNcBYg

 

[Korhan Ayhan]

Deneyiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("D6:F15")) Is Nothing Then Exit Sub
    For Each Hucre In Target.Cells
        With Cells(Hucre.Row, "G")
            .Formula = "=SUM(D" & Hucre.Row & ":F" & Hucre.Row & ")"
            .Value = .Value
        End With
    Next
    With Range("D2:G4")
        .Formula = "=SUMIF($A$6:$A$15,$A2,D$6:D$15)"
        .Value = .Value
    End With
End Sub

 

[baydeniro]

Korhan Ayhan üstadım çok teşekkür ediyorum. Bir ufak ekleme yapılabilir mi !
D2 hücresindeki toplam değiştiği için G2 hücresi de 39 olarak değişebilir mi ?

 

[Korhan Ayhan]

Üstteki mesajımdaki kodu revize ettim. Tekrar deneyiniz.

 

[baydeniro]

Üstteki mesajımdaki kodu revize ettim. Tekrar deneyiniz.

üstadım çok çok teşekkür ediyorum, sağolun varolun, sağlıcakla kalın