Between IIf([Formlar]![FRMCIKTI]![AY1] Is Null;"OCAK";[Formlar]![FRMCIKTI]![AY1]) And IIf([Formlar]![FRMCIKTI]![AY2] Is Null;"ARALIK";[Formlar]![FRMCIKTI]![AY2])Ben böyle çözüm ürettim...
Sesli düşünüyorum eğer "kasım 2013"-"şubat 2014" arası istenirse nasıl sorgulatmayı düşünüyorsunuz?
Birde aşağıdaki kodu tekrar incelerseniz; Excel dosyayı dışarı verirken üstüne yazıyor bilginiz olsun.
Dim Klasor
Klasor = CurrentProject.Path & "\" & "SUÇ İSTATİSTİKLERİ -" & " " & Format(Date, "mm/dd/yy") & " " & Format(Time, "hh-mm-ss-AM/PM") & ".xls"
If MsgBox("Aktarma işlemi,programın bulunduğu yere kayıt olacak,oradan bulun,Verileri Excele aktarmak istiyor musunuz? ", 36, "EXCELE VERI AKTARIMI") = 6 Then
DoCmd.TransferSpreadsheet acExport, 8, "SRGDATA1", Klasor, True, "SRGDATA1"
DoCmd.TransferSpreadsheet acExport, 8, "SRGDATA2", Klasor, True, "SUÇKAPSAMINA "