İlginç ve ihtiyaç duyulan bir çıkarma işlemi

[orrhankaya]

A2'de Çıkarılan, B2'de Çıkan, C2'de Fark var
B2'nin verisini sürekli değiştiriyorum.

Örneğin
Önce B2'ye 2 yazdım, fark 2 eksildi.
Sonra B2'ye 5 yazdım, fark 5 daha eksildi
Daha Sonra B2'ye 3 yazdım, fark 3 daha eksildi.
Ve sonuç olarak fark 10 eksildi.
Makro kullanmadan.

Yapılabildiğini biliyorum. Nasıl yaıldığını unuttum. Sanırım Dolaylı fonksiyonu kullanılıyordu. Yardımcı olacaklara şimdiden teşekkürler

 

[mehmett]

Bizi de merak içinde bıraktınız. Eğer elinizdeyse, bahsettiğiniz dosyayı buraya ekleyebilir misiniz? Siz makro değil dediniz ama ben makro ile yapıldığını sanıyorum.

 

[orrhankaya]

Sayın Mehmett,
Hala dolaylı formülü kullanarak görüp unuttuğum şeyi çözmeye uğraşıyorum.
Konuyla ilgili dosyayı bulabilirsem burada sizinle paylaşırım. Ancak yine de bilen biri mutlaka vardır.
İlginize teşekkür ediyorum

 

[Levent Menteşoğlu]

Excel formüllerinin dinamik olması sebebi ile bu söylediğinizin fonksiyonlarla çözümü pek mümkün görünmüyor. Ancak hücredeki değer değişse bile eski değeri hafızada tutacak bir fonksiyon oluşturulabilirse dediğinizi yapmak mümkün. Gerçi excelde mümkün değil sözünü her zaman tereddüt içinde kullanırım. Eğer böyle bir çözüm bulunmuşsa açıkçası bende çok merak ediyorum.

 

[orrhankaya]

Sayın Leventm
İlginize çok teşekkür ederim. Bu geç saatte sizi meşgul ettim.
Bunun çok basit bir makrolu çözümüne ihtiyacım olacak.

 

[Levent Menteşoğlu]

Aşağıdaki kodu sayfanın kod sayfasına kopyalayarak deneyin.

Dim eski
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$B$2" Then Exit Sub
If [b2] = 0 Then eski = 0
[c2] = [a2] - ([b2] + eski)
eski = [b2] + eski
End Sub

 

[orrhankaya]

Teşekkür ederim. Leventm.

 

[orrhankaya]

Bu işlemin DOLAYLI fonksiyonu ile yapıldığını sanıyordum.
Konuyla ilgili arkadaşı aradım. Bu işin DOLALI fonksiyonu ile değil, Döngüsel başvurudan faydalanarak yapıldığını ancak dosyanın bilgisayarından silinmiş olabileceğini, konuyu tekrar inceleyeceğini belirtti. Konuyu öğrenince formdaki arkadaşlarla paylaşacağım.

 

[Ali]

Levent Bey makro ile güzel bir çözüm bulmuş ama kullandığım morefunction eklentisi ilede yapabildim.Sonuçta yerleşik bir fonksiyon değil. Alternatif olarak dursun diye ekledim.

Morefunction programı içindeki setup ile kurun.Excelde olmayan birçok fonksiyonları içeren bir eklentiniz olacaktır.

http://www.hemenpaylas.com/download/1476917/Morefunc.zip.html

Recall fonksiyonu kullanacağız.

A1 hücrenizde 10 olsun
B1 sürekli değiştirdiğiniz hücre olsun
C1'e =A1-D1 yazın
D1 hücrenizdede =RECALL(DOĞRU)+B1 değeri olsun.

D1 hücresinde sürekli toplanarak A1 hücresinden çıkarılacaktır.

 

[Levent Menteşoğlu]

Döngüsel başvurudan faydalanarak yapıldığını

Bu cümlenizin ardından bir araştırma yaptım. Evet döngüsel başvuru ve yineleme sayısı değeri değiştirilerek ayrıca dördüncü bir hücre kullanılarak çok sağlıklı olmasada böyle bir işlem yapmak mümkün oluyor. Bunun için aşağıdaki işlem sırasını takip edin. Siz üzerinde yoğunlaşarak daha da geliştirebilirsiniz.

1-araçlar-seçenekler-hesaplama-yineleme kutusunu işaretleyin ve yineleme değerini 1 (bir) yapın.

2-Örnek olarak A2 hücresine 10 (on) yazın.

3-C2 hücresine "=A2+C1" formülünü yazın.

4-C1 hücresine "=A2-B2+C1-A2" formülünü yazın.

5-B2 hücresine rakamlar yazarak yapılan işlemi gözlemleyin. C2 hücresindeki sayı B2 ye yazılanların toplamının A2 hücresinden farkı olacaktır.

 

[orrhankaya]

Sayın leventm
teşekkür ederim.
Hazırladığım proğramın diğer kullanıcıları için Seçenekler + Hesaplama menüsündeki yineleme değerini 1 yapmak için sanırım yine makro kullanacağım.