Listbox Ile Tarih Aralığını Raporlama

Kısa Açıklama

Listbox Ile Tarih Aralığını Raporlama isimli başlıkta, ilgili işlemlere dair detaylar yer almaktadır.
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhabalar Değerli Exceldestek.com kullanıcıları,

Ekteki çalışma kitabında CHECKIN, INHOUSE, VISITING, PARKING isimli sayfaları veritabanı olarak kullanıyorum. Her sayfanın formatı farklıdır. Bu sebeple her sayfanın raporu almak için başına REPORT_ yazarak, (Örnek: REPORT_CHECKIN) örnekteki gibi 4 farklı rapor sayfası oluşturdum. UserForm’daki belirtilen tarih aralığına göre ListBoxtaki seçime göre sayfaların raporlarını aynı anda oluşturmak istiyorum.
Benzer örnek çalışmaları incelememe rağmen bir sonuç alamadım. Konuya hakim uzman arkadaşların değerli yardımlarını ve çözüm önerilerini rica ediyorum.

Saygılarımla,
 
Ekli dosyalar
Evet
Başlama Tarihi = Giriş Tarihi
Bitiş Tarihi = Çıkış Tarihi
Bu ayrıntı örnek çalışmayı hazırlarken dikkattimden kaçmıştır.


Çok özür dilerim,
İki tarih aralığı için referans olarak sadece sayfalardaki Giriş Tarihi içeren sütunlardır.
Tarih aralığı için referans alınacak sütunları KIRMIZI renk işaretlenmiştir.
Başlama ve bitiş tarihlerin işaretlediğin sütunlar içerisinde aranacaktır.
örneğin CHECKIN sayfasının raporunu alırken F sütunu içerisinde tarih aralığını esas alacağız.
 
Moderatörün son düzenlenenleri:
Peki bir soru daha sorayım:
UserForm’daki belirtilen tarih aralığına göre
Bahsettiğiniz tarih aralığı peki Giriş Tarihi için mi gerekli Çıkış Tarihi için mi?
Buna bir örnek tarih aralığı verir misiniz?
Mesela Giriş için 05.02.2022 yazdım Çıkış için ise 15.02.2022...
Filtreleme neye göre olacak?
Bu kısım biraz muallakta?
Çünkü her iki sütun ayrı ayrı kayıtlı durumda.
 
Zaten rapor sayfalarında örnek olması için manuel hazırlanmıştır.
Başlama Tarihi=05.02.2022, Bitiş Tarihi=10.02.2022 olarak belinlenmiş sadace Giriş Tarihi sütunları dikkate alınarak hazırlanan örneklerdir.
 
Bahadır bey,

İki konu eksik kalmış, konuyla ilgili iki yeni isteğim olacaktır.
Sadece ListBoxtan seçilen sayfaların raporları alınmalıdır.
Rapor sayfalarındaki eski veriler silindikten sonra, yeni raporlar oluşturulmalıdır.
Oluşturulan raporlar küçükten büyüğe giriş tarihi sütununa göre sıralanmalıdır.
Her sayfadaki veriler yeniden numaralandırılmalıdır.
Bu koşulları sağlarsanız çok makbule geçecektir.

Saygılarımla,
 
Her sayfadaki veriler yeniden numaralandırılmalıdır.
Bu ADO ile mümkün değil ne yazık ki.
Bir dönem çok uğraştım bununla ama Excel üzerinde olmuyor.
Ben ADO dışında diğer kodlar ile bu tür işlemleri yapmaya çok hakim değilim, o yüzden bu hususu sanırım ADO'suz devam ettirmeniz ve bir başka arkadaşımın desteğini beklemeniz gerekebilir.

Sıra no hariç diğer hususlar ek'li dosyada uygulanmıştır.
 
Ekli dosyalar
Bahadır bey,

Öncelikle yardımınız için size çok teşekkür ederim. Size karşı kendimi her zaman müteşekkir hissediyorum.
Bu kez REPORT_INHOUSE listesi sayfasında eski veriler silinmedi.
Sorun değil balki alternatif çözüm üretem bir arkadaş çıkabilir.
ALLAH sizden, sevdiklerinizden ve sebep olanlardan razı olsun.
Hayırlı geceler.

Sayguılarımla.
 
Bu kez REPORT_INHOUSE listesi sayfasında eski veriler silinmedi.
Seçmediğiniz sayfalar için ilgili alanlara not ekledim, oraya silme kodları koyabilirsiniz.
Ya da eğer her açılışta seçilsin seçilmesin farketmeksizin tüm sayfalardaki verilerin silinmesini istiyorsanız, Worksheets("REPORT_" & ListBox1.List(i)).Range("A3:O" & Rows.Count).ClearContents kodunu For i = 1 To ListBox1.ListCount - 1 altına eklemeniz yeterli olur.
ALLAH sizden, sevdiklerinizden ve sebep olanlardan razı olsun.
Cümlemizden Allah razı olsun.
Sıra numarası olayı için yine bir bakacağım alternatif ne yapılır.
Yani aslında veriler sayfaya alındıktan sonra ikinci bir döngü ile sıra numarası verilir.
İşinizi görmek adına onu ekleyim, ilerde kolay yöntemi için bakarız yine.
Sonraki mesajımda dosyayı ekleyeceğim.
 
Günaydın Bahadır Bey,
Hayırlı Cumalar dilerim.

Kusursursuz, olağanüstü güzel olmuş. Ellerinize, emeğinize ve bilginize sağlık.
ALLAH sizden, sevdiklerinizden ve sebep olanlardan razı olsun.
ALLAH sizleri ve sizin gibi güzel insanları korusun ve sıkıntı yüzü göstermesin.
Hakkınızı helal edniz lütfen.

Saygılarımla,
 
Geri
Üst