Yeni Bir Sayfadan Eski Bir Sayfaya Veri Gönderme

[pathetique1789]

Merhaba,

Aşağıdaki gibi bir senaryo Excel'de mümkün müdür?

Sayfa1'in A1 hücresinde herhangi bir sayı olduğunu düşünelim.

Yeni bir sayfa açıp (adı Sayfa2 olsun), oradaki herhangi bir hücreye de (B1 hücresi olsun) bir sayı girelim.

Şimdi,
Sayfa1'de herhangi bir işlem yapmadan, Sayfa2 üzerinden yapacağım bir işlemle, bu hücredeki sayının Sayfa1'in A1 hücresine eklenmesini sağlayabilir miyim? Yani Sayfa1'in A1'i ile Sayfa2'nin B1'inin toplamının Sayfa1'in A1'inde gözükmesini...

Bunu yapmak istememin nedeni, Sayfa2'yi bir şablon gibi istediğim kadar çoğaltıp, yukarıda yapmak istediğim işlemin Sayfa2'yi kopyalayarak türettiğim her yeni sayfayla beraber otomatik olarak yapılmasını sağlamak.

Teşekkürler.

 

[YUSUF44]

Aşağıdaki kodları Sayfa2'nin kod bölümüne yapıştırırsanız (sayfa adına sağ tıklayıp kod görüntüle deyince açılan sayfa) Sayfa2'nin B1 hücresine girilen değer Sayfa1'in A1'hücresinde toplanır:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [B1]) Is Nothing Then Exit Sub
If IsNumeric(Target) = False Then
    MsgBox "Girilen değer sayı olmadığından toplama işlemi yapılmadı!", vbCritical
ElseIf IsNumeric(Sheets("Sayfa1").[A1]) = False Then
    MsgBox "Sayfa1'in A1 hücresindeki değer sayı olmadığından toplama işlemi yapılmadı!", vbCritical
Else
    Sheets("Sayfa1").[A1] = Sheets("Sayfa1").[A1] + Target
End If
End Sub

 

[pathetique1789]

Tam istediğim şekilde çalışıyor. Çok teşekkür ederim.