Raporu açan düğmeye tarih süzgeci koymak istiyorum

Katılım
14 Ocak 2007
Mesajlar
68
Excel Vers. ve Dili
Excel XP Türkçe
Formumun üzerinde ilk ve son isimli iki denetim kutusu ve Tablo1 raporunu açan bir düğmem var ve ben Tablo1 raporunu iki tarih arasındaki değerleri gösterecek şekilde süzerek açmak istiyorum. Ancak sorguda süzgeç kullanmamam lazım. Düğmenin kodları şöyle:

Private Sub Komut4_Click()
On Error GoTo Err_Komut4_Click

Dim stDocName As String

stDocName = "Tablo1"
DoCmd.OpenReport stDocName, acPreview, , "[tarih]>=" & ilk And "[tarih]<=" & son

Exit_Komut4_Click:
Exit Sub

Err_Komut4_Click:
MsgBox Err.Description
Resume Exit_Komut4_Click

End Sub

Raporumda tarih isimli alan da var.
Ancak Type Mismach hatası alıyorum. Nerede yanlış yapıyorum doğru kodları bi türlü bulamadım.
 
Katılım
16 Şubat 2007
Mesajlar
323
Excel Vers. ve Dili
office 2003 prof.tr
Access'in Northwitnd.mdb (Ara-bul se&#231;ene&#287;inden dosya ad&#305; b&#246;l&#252;m&#252;ne nor*.mdb" &#351;eklinde arat&#305;rsan&#305;z bulabilirsiniz, &#246;rne&#287;in benim bilgisayar&#305;mda C:\Program Files\Microsoft Office\OFFICE11\SAMPLES dizininde) &#246;rne&#287;ini incelerseniz orada istedi&#287;iniz tarzda yap&#305;lm&#305;&#351; &#246;rnek raporlar mevcut, muhtemelen sorunuzun cevab&#305;n&#305; bulabilirsiniz.
 
Katılım
14 Ocak 2007
Mesajlar
68
Excel Vers. ve Dili
Excel XP Türkçe
Northwitnd.mdb veritaban&#305;nda bu konuda &#231;&#246;z&#252;m olacak bir rapor yok. Access in di&#287;er &#351;ablonlar&#305;na da bakt&#305;m ama orada da raporlarda sorguda &#246;l&#231;&#252;t yazarak yap&#305;lm&#305;&#351;.
Asl&#305;nda bu &#246;rnekte kriter tarih oldu&#287;u i&#231;in hata verdi&#287;ini biliyorum. Ama tarih &#246;zelli&#287;i i&#231;in s&#252;zgeci nas&#305;l yazaca&#287;&#305;m&#305; bilemedim. Benzer bir &#351;ekilde tarih yerine say&#305; olursa istedi&#287;im sonucu elde ediyorum. &#214;rne&#287;in kay&#305;t no ya g&#246;re s&#252;zmek, yani se&#231;ilen kay&#305;t numaras&#305;n&#305;n raporunu g&#246;r&#252;nt&#252;lemek gibi.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın tuncerg,

Örneğinizi ekleyin böylece daha çabuk cevap bulabilirsiniz.

İyi çalışmalar
 
Katılım
14 Ocak 2007
Mesajlar
68
Excel Vers. ve Dili
Excel XP Türkçe
sayın modalı örnek ekte. İyi çalışmalar.
 
Katılım
21 Ekim 2006
Mesajlar
100
Excel Vers. ve Dili
Excel2003 Tr
Sayın tuncerg, kodu aşağıdaki şekilde değiştir.

DoCmd.OpenReport stDocName, acViewPreview, "", "[tarih] >= [Forms]![Form1]![ilk] And [tarih]<=[Forms]![Form1]![son]", acNormal
 
Katılım
14 Ocak 2007
Mesajlar
68
Excel Vers. ve Dili
Excel XP Türkçe
sayın Aydıno çok teşekkür ederim.
 
Üst