aynı hücre içerisinde değer toplama

Katılım
7 Mayıs 2009
Mesajlar
24
Excel Vers. ve Dili
2007 small bussines
merhaba,

mesela A1=5 B1=10 değerlerine sahip. benim isteğim şu B1 hücresine 5+10=15 yazması, A1 =2 olduğunda B1 hücresi 15+2=17 olmalı. aynı hücrede formül yazınca hata veriyor. özel yapıştır ile oluyor ancak her rakam değiştiğinde tek tek yapmam lazım. varmı bir önerisi olan :)
 

muygun

Özel Üye
Katılım
6 Temmuz 2004
Mesajlar
9,104
Excel Vers. ve Dili
Excel-2003 Türkçe
Merhaba;
Sayfanın kod bölümüne;

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("a1")) Is Nothing Then Exit Sub
[b1] = [b1] + [a1]
End Sub

Kodlarını yerleştirip deneyin.
İyi çalışmalar.
 

muygun

Özel Üye
Katılım
6 Temmuz 2004
Mesajlar
9,104
Excel Vers. ve Dili
Excel-2003 Türkçe
Merhaba;
Önceki makroyu silin ve;

Private Sub Worksheet_Change(ByVal Target As Range)
sat = Target.Row
süt = Target.Column
If sat <= 30 And süt = 1 Then
Cells(sat, "b") = Cells(sat, "b") + Cells(sat, "a")
End If
End Sub

Şeklinde uygulayarak deneyin.
İyi çalışmalar.
 
Katılım
7 Mayıs 2009
Mesajlar
24
Excel Vers. ve Dili
2007 small bussines
çok teşekkür ederim yardımlarınız için.
 
Üst