09. juni 2004 - 10:21Der er
22 kommentarer og 1 løsning
Filter til Rapport
Jeg kan ikke få mit filter til at virke, jeg kan godt skrive den ud uden brug af filter.
If Me.V_Status = 1 Or Me.V_Status = 2 Or Me.V_Status = 3 Then If Me.V_Status = 1 Then If Me.ByggeTilbud = True Then Dim bygtil As String, bygtilUbyg As String bygtil = (OverKategori = 9) bygtilUbyg = (OverKategori <> 9)
Rapporter!DocName![QuotationSub].Rapport.Filter = bygtil Rapporter!DocName![QuotationSub].Rapport.FilterOn = True DoCmd.OpenReport DocName, PrMode, , strfind End If If Me.ByggeTilbud = False Then DoCmd.OpenReport DocName, PrMode, , strfind End If End If End If
If Me.V_Status = 1 Or Me.V_Status = 2 Or Me.V_Status = 3 Then If Me!V_Status = 1 then if Me!ByggeTilbud = True Then DoCmd.OpenReport DocName, PrMode,,"Overkategori = 9" else DoCmd.OpenReport DocName, PrMode, , strfind End If End If End If
(Der mangler nok et eller andet...kunne ikke lige gennemskue hvad du ville med bygtilUbyg = (OverKategori <> 9))
Kan det ikke være fordi du har paranteser i stedet for anførselstegn: bygtil = (OverKategori = 9) bygtilUbyg = (OverKategori <> 9) Altså - prøv med: bygtil = "OverKategori = 9" bygtilUbyg = "OverKategori <> 9"
2) Tilbud der er opdelt i to tilbud. Dette har jeg tænkt at styre med filter så jeg skrivet det første tilbud uden Kategori 9 (OverKategori <> 9) og herefter Kategori alene (OverKategori = 9)
I didnt know it was possible to set a reports filter BEFORE the report is open!
Th filter should be included in the DoCmd.Openreport ... so if it sint working then I would assume that its because your filter has the wrong syntax (field names and types)
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.