AccessTr.neT

Tam Versiyon: iki tarih arasında uygun olan raporlar
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
formdan iki tarih arasında ilgili raporların önizlemesini yapmak istiyorum;
1- 100'e yakın rapor var form üzerinden iki tarih seçeceğim ve bu tarihleri arasında
alıs tablosundan kayıtların kontrol edilip, hangi raporlara denk geliyorsa o tarihler o raporların önizlemesini yaptırmak istiyorum geriye kalan raporları istemiyorum..
bu mümkün mü acaba teşekkür ederim.

Ek Dosyalar
 TArih ARALIGINDAKİ RAPORU VERSİN.rar(90.63 KB)
100 rapor için hata verir mi emin değilim,

formdaki rapor açtırma butonuna aşağıdaki kodu ekle

On Error Resume Next
Dim accesstr As AccessObject
For Each accesstr In CurrentProject.AllReports
DoCmd.OpenReport accesstr.Name, acViewPreview, , , acHidden
Next accesstr
If Err = 2501 Then Err.Clear

raporların veri yokken olayına aşağıdaki kodu ekle

On Error Resume Next
Cancel = True
If Err = 2501 Then Err.Clear
İncelermisiniz...

14/1 isterseniz Elma ve Kayısı raporları açılacak.
15/1 isterseniz Elma , Armut , Kayısı 3 raporda açılacak
16/1 isterseniz sadece Kayısı açılacaktır.

Lütfen olumlu veya olmusuz geri dönüş yapınız...
cevabınızı gördüm şu an uygulama fırsatım yok kusura bakmayın ilk fırsatta bakar dönerim teşekkürler
ilginize teşekkür ederim.
uygulamanın tümünde diyelim ki 80 rapor var burada bu form ile kullancağım rapor sayısı yaklaşık 50 rapor bu raporlara bağlı yaklaşık 25 tanesi de alt rapordur..
yani benim raporlamak istediğim kayıt sayısı belli ve hangi raporlar
olduğunu ben biliyorum. bunları yazma şansım varsa daha iyi olur kodların arasına

ama raporların kayıt kaynakları en az 3 sorguya ayrı ayrı başvuruda bulunuyor..
ama asıl hepsinin temeli alıs tablosudur.
biraz karmaşık belki ama çözümü mutlaka vardır.
sağolun şimdiden

uygulamamın bir parçasını ekliyoru örnek rapor aslı gibi eklenmiştir. sorgular tablo vs..
bunun üzerinde düşünürsek işimiz daha da kolay olacaktır sanırım.
teşekkürler geçikme için özür dilerim.


---DELETE----
Sayfalar: 1 2