Ağaç Oluşturma

neyzenburak

Altın Üye
Katılım
30 Haziran 2019
Mesajlar
32
Excel Vers. ve Dili
MSOffice 2016 (İş)
MSOffice 2013 (EV)
Altın Üyelik Bitiş Tarihi
31-08-2025
Merhaba,

Ağaç formu oluşturmaya çalışıyorum. Sayfa 1 (2) isimli sayfada C4 hücresine yazdığım değeri olasılık sayfasının c sütununda arayıp bulduğu satırı Sayfa1 (2) de 6. satıra olduğu gibi yazdırıyorum.

Yazdırılan hücre değerlerini idlist sayfasında arattırıyorum. Eğer bu sonuç idlist sayfasında yok ise "kutu" yazdırıyorum.

"Kutu" yazdırabildiklerimin de içeriğini aratabilmek için alt satırlara şöyle bir formül yazdım ;

Kod:
=EĞER(KAYDIR(D6;1;;;)="Kutu";D6;EĞER(KAYDIR(E6;1;;;)="Kutu";E6;EĞER(KAYDIR(F6;1;;;)="Kutu";F6;EĞER(KAYDIR(G6;1;;;)="Kutu";G6;EĞER(KAYDIR(H6;1;;;)="Kutu";H6;EĞER(KAYDIR(I6;1;;;)="Kutu";I6;EĞER(KAYDIR(J6;1;;;)="Kutu";J6;EĞER(KAYDIR(K6;1;;;)="Kutu";K6;EĞER(KAYDIR(L6;1;;;)="Kutu";L6;EĞER(KAYDIR(M6;1;;;)="Kutu";M6;EĞER(KAYDIR(N6;1;;;)="Kutu";N6;EĞER(KAYDIR(O6;1;;;)="Kutu";O6;EĞER(KAYDIR(P6;1;;;)="Kutu";P6;EĞER(KAYDIR(Q6;1;;;)="Kutu";Q6;EĞER(KAYDIR(R6;1;;;)="Kutu";R6;EĞER(KAYDIR(S6;1;;;)="Kutu";S6;EĞER(KAYDIR(T6;1;;;)="Kutu";T6;EĞER(KAYDIR(U6;1;;;)="Kutu";U6;EĞER(KAYDIR(V6;1;;;)="Kutu";V6;EĞER(KAYDIR(W6;1;;;)="Kutu";W6;"Daha Kutu YOk"))))))))))))))))))))
Tıkandığım yer burası. Manual olarak ağacı kendim oluşturabiliyorum (örnekte D6-E6 ve F6 numarası yazan kutuları formülleri kopyala yapıştır yaparak kendim yapıştırdım ama kutu içerisinde kutu döngüsü arttıkça formülün çalışmayacağından eminim) ancak bunu formülle yada makro ile çözmek istiyorum.

Özetle C4 hücresine yazdığım numaranın içerisinde kutu yazabilecek ne varsa tek tek açtırmak istiyorum. Bu konuda yardımcı olabilecek var mı?
 

Ekli dosyalar

neyzenburak

Altın Üye
Katılım
30 Haziran 2019
Mesajlar
32
Excel Vers. ve Dili
MSOffice 2016 (İş)
MSOffice 2013 (EV)
Altın Üyelik Bitiş Tarihi
31-08-2025
Yardımcı olabilecek var mı? Yapılması mümkün olan birşey mi ?
 

hmtstc

Altın Üye
Katılım
20 Şubat 2014
Mesajlar
314
Excel Vers. ve Dili
Excel 2016 - Türkçe
Altın Üyelik Bitiş Tarihi
10-04-2025
hocam kutu yazısı sadece 2. kademede geliyor diye görüyorum. 3. kademe de gelme ihtimali var mı ?
 

hmtstc

Altın Üye
Katılım
20 Şubat 2014
Mesajlar
314
Excel Vers. ve Dili
Excel 2016 - Türkçe
Altın Üyelik Bitiş Tarihi
10-04-2025
hocam, ben sadece 2. kademede kutu yazıyor ve yeniden sıralama yapıyor şeklinde yazdım. 3. kademede yeniden sıralama çalışırsa düzen bozulur. umarım işini görür. sen bi kaç deneme ile kontrol edersin yine de.
 

Ekli dosyalar

neyzenburak

Altın Üye
Katılım
30 Haziran 2019
Mesajlar
32
Excel Vers. ve Dili
MSOffice 2016 (İş)
MSOffice 2013 (EV)
Altın Üyelik Bitiş Tarihi
31-08-2025
Hocam ellerine sağlık, tam olarak düşündüğüm gibi çalışıyor. Ufak bir ekleme yapmam gerekecek, kendim deneyeceğim, yaparsam yine burada paylaşırım. Çok teşekkür ederim
 

neyzenburak

Altın Üye
Katılım
30 Haziran 2019
Mesajlar
32
Excel Vers. ve Dili
MSOffice 2016 (İş)
MSOffice 2013 (EV)
Altın Üyelik Bitiş Tarihi
31-08-2025
Merhaba, @hmtstc hocamın desteğiyle tabloyu kendi eklediği haline getirdik ancak mesajda da bahsettiği gibi 3. kademe kutuları açtırmada zorluk yaşıyoruz.

hmtstc hocamın eklediği tabloda örnek sayfasındaki yeşil hücreye 41671 numarasını yazarsanız 41. satırdaki kutu yazanları açamadığını görebilirsiniz. Aynı sıra sistemiyle açtırmayı nasıl yapabiliriz ?
 

hmtstc

Altın Üye
Katılım
20 Şubat 2014
Mesajlar
314
Excel Vers. ve Dili
Excel 2016 - Türkçe
Altın Üyelik Bitiş Tarihi
10-04-2025
merhaba,

denemenizi rica ederim.

sonsuz olarak döngü sağlar
 

Ekli dosyalar

neyzenburak

Altın Üye
Katılım
30 Haziran 2019
Mesajlar
32
Excel Vers. ve Dili
MSOffice 2016 (İş)
MSOffice 2013 (EV)
Altın Üyelik Bitiş Tarihi
31-08-2025
merhaba,

denemenizi rica ederim.

sonsuz olarak döngü sağlar
Hocam tam olarak doğru çalışmıyor, aynı kutuları açmaya çalıştığı da oluyor, bazı kutuları açmadığı da oluyor. Örneğin 30008 yazınca görebilirsin.
 

hmtstc

Altın Üye
Katılım
20 Şubat 2014
Mesajlar
314
Excel Vers. ve Dili
Excel 2016 - Türkçe
Altın Üyelik Bitiş Tarihi
10-04-2025
hocam şimdi tekrar düzelttim. başka bir hata vardı. ama sistem şu anda veritabanını kuullanıyor. veritabanını da kontrol edebilir misin. ben 30008 için deneyince mükerrer kayıtlar gördüm.
 

Ekli dosyalar

Üst