Basit döngü oluşturma

[ssdestek]

Merhaba,
Excel 2010 TR kullaniyorum. EĞER() fonksiyonu ile basit bir döngü oluşturmak istiyorum ama bir türlü beceremedim. Ekli dosya dan açıkladım.
Yok mu yardım edecek kimse...

 

[Ömer]

Sayın ssdestek,

Aynı konuyla ilgili yeni konu açmak yerine sorunuzu gözden geçirmenizi tavsiye ederim. Genellikle sorulara yanıt gelmiyorsa konu anlaşılmadığı için yada konunun soru cevap ilişkisinden ziyade bütün bir konu isteği olduğundandır.

Ben sizin sorunuzu okudum, sorunuzdan birşey anlamak çok zor. Konuyu daha detaylı açıklayınız.

 

[ssdestek]

Sayın ssdestek,

Aynı konuyla ilgili yeni konu açmak yerine sorunuzu gözden geçirmenizi tavsiye ederim. Genellikle sorulara yanıt gelmiyorsa konu anlaşılmadığı için yada konunun soru cevap ilişkisinden ziyade bütün bir konu isteği olduğundandır.

Ben sizin sorunuzu okudum, sorunuzdan birşey anlamak çok zor. Konuyu daha detaylı açıklayınız.

merhaba,
bende onu merak ediyorum, biri bana desinki sorun anlaşılmadı. Ben de anlaşılır olacak şekilde hatamı düzelteyim ve yeniden yazabileyim.

 

[ssdestek]

merhaba,
bende onu merak ediyorum, biri bana desinki sorun anlaşılmadı. Ben de anlaşılır olacak şekilde hatamı düzelteyim ve yeniden yazabileyim.

-----------------------------------

yapmak istediğim:
C5 de çıkan sonucu tekrar girişte veri olarak kullanbilmektır. Yani C1-C2 de hesaplana değerler C4 e aktarılıyor. B2 ye koşul koydum. B2 deki koşul gerçekleşirse C4 ten çıkan sonucu C1 'e çarpan olarak aktar. Ve bu böyle bir döngü içinde B2 koşulu gerçekleştiği sürece devam etsin istiyorum.

Diğer bir deyişle C4 ten çıkan sonuç C1 e çarpan olarak gitsin ve bu çarpana göre C4 ün bir sonraki değeri değişecek ve yine bu değişen değer ikinci kez C1 e çarpan olarak gitsin ve yine üçüncü kez C4 değeri değişecek ve yine C1 e çarpan olrak gitsin, çarpan olark gittiği için 4. kez C4 değeri değişecek ve yine C1 e bu her son değer çarpan olarak gitsin. Bunu yaptığmıda döngüye girdi giye hata mesajı veriyor,
ama bunu bir makro ile yaparken çıkan değer geçici bir değişkene aktarılır ( yani C4 değeri), sonra bu değişken den C4 değeri alınıp C1 e aktarılır.

 

[asi_kral]

Merhaba
Sorunuzu bende okuyorum ama anlamıyorum. Siz en iyisi mi örnek dosya üzerinde detaylandırarak anlatın. Ona göre bakalım. Bu şekilde çözübileceğimi zannetmiyorum.

 

[ssdestek]

Excel de EĞER() formülü ile döngü oluşturma

Yapmak istediğim:
C5 de çıkan sonucu tekrar girişte veri olarak kullanabilmektir. Yani C1-C2 de hesaplana değerler C5 e aktarılıyor. B2 ye koşul koydum. B2 deki koşul gerçekleşirse C5 ten çıkan sonucu C1’e çarpan olarak aktar. Ve bu böyle bir döngü içinde B2 koşulu gerçekleştiği sürece devam etsin istiyorum. Örnek şema ektedir
.

 

[ssdestek]

Excel de EĞER() formülü ile döngü oluşturma

Sayın ssdestek,

Aynı konuyla ilgili yeni konu açmak yerine sorunuzu gözden geçirmenizi tavsiye ederim. Genellikle sorulara yanıt gelmiyorsa konu anlaşılmadığı için yada konunun soru cevap ilişkisinden ziyade bütün bir konu isteği olduğundandır.

Ben sizin sorunuzu okudum, sorunuzdan birşey anlamak çok zor. Konuyu daha detaylı açıklayınız.

******************************
Yapmak istediğim:
C5 de çıkan sonucu tekrar girişte veri olarak kullanabilmektir. Yani C1-C2 de hesaplana değerler C5 e aktarılıyor. B2 ye koşul koydum. B2 deki koşul gerçekleşirse C5 ten çıkan sonucu C1’e çarpan olarak aktar. Ve bu böyle bir döngü içinde B2 koşulu gerçekleştiği sürece devam etsin istiyorum. Örnek şema ektedir

 

[asi_kral]

Merhaba
Dosyanızda böyle koşullar mevcut değil.
C1 hücresinde

=$B$2*2

Bu formül var
C2 hücresi boş
C3 hücresinde sadece 2 yazıyor
C4 hücresi boş
C5 hücresinde

=TOPLA(C1:C4)

Bu formül var
B2 hücresinde ise

=EĞER(C5/2=B1;C5;0)

Bu formül var sizin yapmak istediğiniz nedir. Ben size resimle anlatın demedim dosya üzerinde ayrıntılı anlatın dedim. Ayrıca istediğiniz formül ile olmaz çünkü formül direk hesap yapar akılda belli bir kriteri tutmaz bunun için makro kullanmanız gerekecek.

 

[ssdestek]

Excel de EĞER() formülü ile döngü oluşturma

Merhaba
Dosyanızda böyle koşullar mevcut değil.
C1 hücresinde

=$B$2*2

Bu formül var
C2 hücresi boş
C3 hücresinde sadece 2 yazıyor
C4 hücresi boş
C5 hücresinde

=TOPLA(C1:C4)

Bu formül var
B2 hücresinde ise

=EĞER(C5/2=B1;C5;0)

Bu formül var sizin yapmak istediğiniz nedir. Ben size resimle anlatın demedim dosya üzerinde ayrıntılı anlatın dedim. Ayrıca istediğiniz formül ile olmaz çünkü formül direk hesap yapar akılda belli bir kriteri tutmaz bunun için makro kullanmanız gerekecek.

***************************************
MERHABA,
kafanız karışmasın diye sadeleştirerek son resim ve blok diyagram olarak gönderdim. Ecxel olarak örnek dosyayı istiyorsanız ekliyorum.

 

[asi_kral]

***************************************
MERHABA,
kafanız karışmasın diye sadeleştirerek son resim ve blok diyagram olarak gönderdim. Ecxel olarak örnek dosyayı istiyorsanız ekliyorum.

Merhaba
Bu kodu sayfanın kod bölümüne kopyalayıp deneyin.

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim KL As Long
KL = Range("C5")
Application.EnableEvents = False
If Intersect(Target, Range("B1")) Is Nothing Then _
Application.EnableEvents = True: Exit Sub
If Range("C5") < Target Then
If Range("B2") > 0 Then
Range("C1") = KL + Range("B2") * 2
End If
Range("B2") = Range("C5")
End If
Application.EnableEvents = True
End Sub