Listeden çok kritere göre veri alma ve otomatik sıralama

muygun

Özel Üye
Katılım
6 Temmuz 2004
Mesajlar
9,154
Excel Vers. ve Dili
Excel-2003 Türkçe
Sayın muygun,

Teşekkür ediyorum. Elimde alternatif bir çalışma olmuş oldu. Fakat listeleme yaparken üçer adet listeliyor. Onu nasıl düzeltebilirim?
Merhaba;
Listede ne kadar bulduysa o kadar listeliyor. (veri tabanını deneme amaçlı çoğaltmıştım.)
İyi çalışmalar.
 

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Merhaba sayın muygun,

Çoğalttığınızı farketmemiştim. tekrar teşekkür ederim.
Saygılar.
 

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Merhaba,

Çalışmamı belli bir aşamaya getirdim. Fakat düzeltilmesi gereken bazı formüller var. Örnek dosyada açıklama yazarak yapılması gerekenleri yazdım. Yardımlarınızı bekliyorum.

Saygılar.
 

Ekli dosyalar

Mahir64

Destek Ekibi
Destek Ekibi
Katılım
19 Nisan 2006
Mesajlar
6,677
Excel Vers. ve Dili
Excel 2013-Türkçe
Excel 2016-Türkçe
Merhaba
Formülünüze EĞERHATA ekleyiniz.
Kod:
=EĞERHATA(EĞER($B6="";"";İNDİS(GENEL!$C$6:$AG$700;KAÇINCI($B6;GENEL!$AS$6:$AS$700;0);KAÇINCI(G$5;GENEL!$C$6:$AG$6;0)));"")
gibi..
 

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Sayın Mahir ÇÜMEN çok teşekkür ederim.

KATILIM sayfasında B6 hücresinden başlayarak aşağıya doğru yazdığım

Kod:
=EĞER(SATIR()-5>mak;"";TOPLA(B5;1))
formülü de #AD? hatası veriyor. Onu nasıl düzeltebilirim?
 

Mahir64

Destek Ekibi
Destek Ekibi
Katılım
19 Nisan 2006
Mesajlar
6,677
Excel Vers. ve Dili
Excel 2013-Türkçe
Excel 2016-Türkçe
Merhaba,

B7 hücresine yazarak aşağı doğru çekerek çoğaltın.
Kod:
=MAK($B$6:B6)+1
 

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Merhaba,

B7 hücresine yazarak aşağı doğru çekerek çoğaltın.
Kod:
=MAK($B$6:B6)+1
Sayın Mahir ÇÜMEN,

B7 hücresine yazdığım formül sonucu C7 hücresi doluysa görünecek. Otomatik sıra no yapmak istiyorum. Sizin formül boş satırlara da sıra no atıyor.

Aşağıdaki formülü kullandığımda da "Dönüsel hata" veriyor.

Kod:
=EĞER(KIRP(C6)="";"";EĞERSAY(B$5:$B5;">0")+1)
 

Mahir64

Destek Ekibi
Destek Ekibi
Katılım
19 Nisan 2006
Mesajlar
6,677
Excel Vers. ve Dili
Excel 2013-Türkçe
Excel 2016-Türkçe
Merhaba,

C6 hücresindeki formülünüz de" EĞER($B6="";""; " B6 hücresi doluyken işlem yapmakta. Bu durumda döngüsel başvuru hatası vermesi normal.
 

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Merhaba,

C6 hücresindeki formülünüz de" EĞER($B6="";""; " B6 hücresi doluyken işlem yapmakta. Bu durumda döngüsel başvuru hatası vermesi normal.
Sayın Mahir ÇÜMEN,
Teşekkür ederim. Belki çözüm üreten bir arkadaş çıkar.
 

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Sayın Ömer BARAN,

#20 numaralı mesajımla ilgili çözüm üretemedim. Bu konuda desteğinizi bekliyorum.

Saygılarımla.
 

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
12,997
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
Tekrar merhaba.

23 numaralı cevap eki örnek belge üzerinden aşağıdaki işlemleri yaparak istediğiniz sonucu elde edebilirsiniz.

-- KATILIM adlı sayfadaki sütun başlıkları ile GENEL adlı sayfa sütun başlıklarının birebir aynı olmasını sağlayın (GİRİŞ T. gibi)
-- KATILIM adlı sayfa B6 hücresine aşağıdaki formülü uygulayın ve aşağı doğru kopyalayın.
Kod:
=EĞER(SATIR()-5>MAK(GENEL!$AS:$AS);"";TOPLA($B5;1))
-- KATILIM adlı sayfa C6 hücresine aşağıdaki formülü uygulayın ve formülü sağa ve aşağı kopyalayın.
Kod:
=EĞER($B6="";"";İNDİS(GENEL!$C$6:$AG$700;KAÇINCI($B6;GENEL!$AS$6:$AS$700;0);KAÇINCI(C$5;GENEL!$C$6:$AG$6;0)))
 

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Sayın Ömer BARAN,

Bilgi, destek ve emeğiniz için çok teşekkür ediyorum.

Size çok zahmet veriyorum. Fakat daha önce yardımcı olduğunuz ekteki çalışmamda verileri RAPOR sayfasına alırken, "İL"e göre alfabetik sıralama yapılabilir mi?

Saygılarımla.
 

Ekli dosyalar

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
12,997
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
Tekrar merhaba.

Formüllerle sıralama yapmakla uğraşmak yerine önerim;
listenin kaynağı olan GENEL sayfasının alfabetik sıralanmasını sağlamak.

Bunun için;
-- alt taraftan GENEL sayfasının adına fareyle sağ tıklayıp KOD GÖRÜNTÜLEyi seçin,
-- açılan VBA ekranının sağ tarafındaki boş alana aşağıdaki kod'u yapıştırın,
-- belgenizi MAKRO İÇEREN EXCEL BELGESİ olarak kaydedin.
Böylece GENEL sayfasına veri girişini normal şekilde yapıp bu sayfadan ayrıldığınızda
GENEL sayfası alfabetik sıralanacak ve dolayısıyla da RAPOR sayfasında da alfabetik bir liste elde etmiş olacaksınız.
.
Kod:
[FONT="Arial Narrow"]Private Sub Worksheet_Deactivate()
    Sheets("GENEL").Range("C6:P700").Sort Key1:=[C5], Order1:=xlAscending
End Sub[/FONT]
 

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Sayın Ömer BARAN,

Çok teşekkür ediyorum.

Yeni yılda sağlık, mutluluk ve tüm güzellikler sizinle olsun.
 

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Merhaba,

Küçük bir ekleme yapmak istiyorum.

RAPOR sayfasında C2 hücresinde İL seçilince, C4 hücresine;

--Eğer seçilen il LİSTE sayfası E6:E20 arasında varsa, C2'deki ilin yanına ŞUBE yazılsın
(Örneğin: C2 İSTANBUL seçilirse, C4'e "İSTANBUL ŞUBE" yazılacak)

--C2'de seçilen il LİSTE E6:E20 arasında yoksa "AFYON TEMSİLCİLİK" yazılsın.

* Örnek çalışma #32 nolu mesajda.
 

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
12,997
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
Merhaba.

Son isteğiniz için;
-- EĞERSAY(DOLAYLI(temsilcilikler);il) ..... veya
-- EĞERSAY(DOLAYLI(şubeler);il) ..... gibi düşünerek
basit EĞER formülüyle kolaylıkla kendiniz de halledebilirsiniz diye düşünüyorum.

Ayrıca belgedeki AD TANIMLAMAlarını da gözden geçirmenizde yarar var sanırım.
Ben LİSTE sayfasındaki sütun başlıklarından hareketle ADlandırma yapmıştım.
.
 

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Merhaba

Ömer hocam, çalışmayla ilgili yeni bir formüle ihtiyacım var. İstediklerimi ekli dosya içerisinde anlattım. Desteğinizi bekliyorum.

Saygılar.
 

Ekli dosyalar

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Merhaba

Ömer hocam, çalışmayla ilgili yeni bir formüle ihtiyacım var. İstediklerimi ekli dosya içerisinde anlattım. Desteğinizi bekliyorum.

Saygılar.
Konuyu çözemedim. Yardım arayışım devam ediyor. İlgi ve desteklerinizi bekliyorum.
 

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
12,997
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
Tekrar merhaba.

Belge ekte.
(GENEL sayfası R sütunu yardımcı sütun)
.
 

Ekli dosyalar

ganiyu

Altın Üye
Katılım
21 Aralık 2016
Mesajlar
47
Excel Vers. ve Dili
Office Professional Plus 2019 Türkçe
Altın Üyelik Bitiş Tarihi
02-03-2025
Sayın Ömer BARAN,

Size çok zahmet verdim. Bilgi ve emeğinize sağlık. İyi ki varsınız. Çok teşekkür ederim.
 
Üst