Sayfa1'den Sayfa2'ye Toplam İşlemi

[baba58]

Selam Arkadaşlar Sayfa 1 Deki A1 Sutunundaki veriyi Sayfa2 'Deki A1 sütununa toplayacak;ama Sayfa 2'deki sabit olup,Sayfa1'deki değişken olduğundan devamlı olarak Sayfa1'e yazdığımı Sayfa2'nin üstüne toplayacak.Sayfa 1'dekini sildiğimde Sayfa2'deki silinmeyecek.Bana bu konuda yardımcı olursanız sevinirim.
Şimdiden iyi çalışmalar

 

[Korhan Ayhan]

Selamlar,

Sayfa1 in kod bölümüne aşağıdaki kodu uygulayıp denermisiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address <> "$A$1" Then Exit Sub
    [Sayfa2!A1] = [Sayfa2!A1] + Target
End Sub