G2'ye Her değişken değer atandığında bu değerleri I2'de Topla

[Emsdmr]

Değerli arkadaşlar;
Çalışma Sayfası İçerisinde G2 hücresine değişken değerler atayıp bu değerleri herseferinde I2 Hücresinde toplamak istiyorum. İlgili konuyu forum içerisinde nasıl arayacağımı bilemediğim için arama yapmadan soruyorum.
ÖRNEK:
G2 Hücresi = 1 - I2 Hücresi = 1
G2 Hücresi = 1 - I2 Hücresi = 2
G2 Hücresi = 2 - I2 Hücresi = 4
G2 Hücresi = 10 - I2 Hücresi = 14
Konuyla ilgili linkde verebilirsiniz.
teşekkürler.

 

[Ömer]

Merhaba,

Toplama yapacağınız sayfanın Kod bölümüne aşağıdaki kodları kopyalayıp yapıştırınız..

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

.

 

[Emsdmr]

sayın ömer hocam teşekkür ederim
ben sorumun cevabını formül şeklinde alacağımı düşünmüştüm bu yüzden soruyu bu şekilde sordum.
sizden ricam sorumun şu şekilde düzeltilmiş haline bir çözüm bulmanız.

comboboxdan a2 hücresindeki veri seçildiğinde texbox1'e G2 Yansıyor ve texbox2'ye I2 yansıyor
bir buton ile G2 deki veriyi güncelliyorum verdiğiniz kod ile bu satırdaki problem çözülmüş oluyor

ancak ben a3 hücresindeki veriyi seçtiğimde texbox1'e G3 ve texbox2'ye I3 yansıyacak fakat bu satırda güncelleme yapamamış olacağım
altalta bütün satırlarda bu güncellemeyi yapmam mümkünmü?
aynı soruyla tekrar cevap bekliyor olduğum için özür dilerim
ilginize teşekkür ederim.