filtrovat report podle datumu vba access

"Rady nielen z Porady" - Tipy a triky, "how-to ...", nápady a riešenia k aplikáciam MS Office
pre všetky verzie až po MS Office 2010

filtrovat report podle datumu vba access

Poslaťod lukasb » 22.06.2011, 13:56

Prosim vas, potrebuji pomoci ohledne vytvoreni filtru na filtrovani reportu pouze na data, ktere napisu do formulare.
mam formular, kde mam dve okenka Od a Do, kam vypisu datum. z techto okynek si nactu hodnotu do promenne FiltrOd a FiltrDo.
a pak po stisku tlacitka chci vypsat jen ty udaje, ktere jsou v rozmezi techto dat.

napadlo me napsat toto, ale nejak to nefiltruje:-(. kolonka na reportu Datum je ve formatu date

FiltrOd as date
FiltrDo as date

docmd.openrecord "rptVystup",acViewPreview , , [Datum] between "&FiltrOd&" and "&FiltrDo&"

moc dekuji za pomoc
lukasb
 
Príspevky: 46
Registrovaný: 29.11.2010, 16:30
Udelené poďakovania: 3 krát
Prijaté poďakovania: 0 krát

Re: filtrovat report podle datumu vba access

Poslaťod Palo-admin » 22.06.2011, 20:26

Pred a za dátumovú premennú treba vložiť znak #, alebo vložiť do fn Cdate().

Niekedy je vhodné najskôr prekonvertovať dátumový string do formátu RRRR-MM-DD, napr:
Format(MojaDatPremenna;"yyyy-mm-dd")

P.
Palo-admin
Administrátor stránky
 
Príspevky: 473
Registrovaný: 18.07.2008, 16:43
Udelené poďakovania: 6 krát
Prijaté poďakovania: 63 krát

Re: filtrovat report podle datumu vba access

Poslaťod lukasb » 23.06.2011, 07:33

prosim te, ted jsem z toho trochu zmateny. jak by to prosim melo tedy vypadat?

filtrOd=Format(Od,"yyyy-mm-dd")
filtrDo=Format(Do,"yyyy-mm-dd")
[Datum]=Format(Den,"yyyy-mm-dd")


docmd.openrecord "rptVystup",acViewPreview , , Den between #"& Od &"# and #"&Do&"#

Takto si to myslel?
diky moc!
lukasb
 
Príspevky: 46
Registrovaný: 29.11.2010, 16:30
Udelené poďakovania: 3 krát
Prijaté poďakovania: 0 krát

Re: filtrovat report podle datumu vba access

Poslaťod Palo-admin » 23.06.2011, 08:32

Ano, v tomto poradí.

TIP: pre výber určitých položiek pre zostavu používam filter nad zdrojom dát, pri otvorení zostavy:
Napr. takto:

Kód: Vybrať všetko
Private Sub Report_Open(Cancel As Integer)
    Dim MyForm As String
   
    Me.Filter = ""

    MyForm = "Zxx_Filter_OdDo"
    On Error GoTo errdsc
    DoCmd.RunMacro "Txx_Filter_OdDo.otvor"

    If ISLOADED(MyForm) Then
        Me.Filter = filter_text
        Me.FilterOn = (Len(Me.Filter) > 0)
    End If
errdsc:

End Sub
Palo-admin
Administrátor stránky
 
Príspevky: 473
Registrovaný: 18.07.2008, 16:43
Udelené poďakovania: 6 krát
Prijaté poďakovania: 63 krát

Re: filtrovat report podle datumu vba access

Poslaťod lukasb » 27.06.2011, 10:49

Palo, tak jsem zkousel to poradi toho kodu, jak si mi poradil a nefunguje to :-(. pres to makro to nechci delatr. prosim, jak by to melo vypadat? uz se tim trapim x dnů a nic :-(. diky za pomoc
lukasb
 
Príspevky: 46
Registrovaný: 29.11.2010, 16:30
Udelené poďakovania: 3 krát
Prijaté poďakovania: 0 krát

Re: filtrovat report podle datumu vba access

Poslaťod lukasb » 29.06.2011, 14:13

Palo, tak jsem to zkousel i pres to makro, coz bezi vypada super, krasne to filtruje, ale cisla. kdyz chci filtrovat datumy, tak to haze chybu nesoulad typu atd :-(. prosim te, ukaz mi, jak by mel vypadat ten skript na to filtrovani datumu u tohgo formulare, kdezadavam ten datum? moc dekuji!!
lukasb
 
Príspevky: 46
Registrovaný: 29.11.2010, 16:30
Udelené poďakovania: 3 krát
Prijaté poďakovania: 0 krát


Späť na Word, Excel, PowerPoint, Outlook, Access

Kto je on-line

Užívatelia prezerajúci fórum: Žiadny registrovaný užívateľ nie je prítomný a 1 hosť

cron