Criteria wissen

[87122270student]

Hoi allemaal,

Ik open vanuit mijn formulier een raport (deze word gefiltert),
Bij het sluiten moet deze filter eraf dus ik dacht:

Private Sub cmdWisFilter_Click()
Me.Filter = ""
End sub

Punt is alleen dat de filter in de query achter het rapport blijft hangen in de criteria van het veld waarop gefilterd is.
Deze moet ik nu handmatig elke keer wissen.

Kan ik deze criteria laten wissen na het openen van het rapport?
Bovenstaande code wis enkel de filter zelf.

 

[87122270student]

Inmiddels heb ik de volgende code erbij gezet:

Docmd.acReport, "Raport naam", acSaveNo

Normaal gesproken vraagd hij niet om instellingen op te slaan als ik iets heb veranderd.
Nu vraag die het uiteraard ook niet maar helpt de code wel?

 

[Bakk4318]

Kijk is op onderstaande link. Misschien kun je daar wat mee.

http://www.datapigtechnologies.com/flashfiles/passparamtoreport.html

 

[87122270student]

Charles,

Bedankt snap wat deze meneer doet maar denk niet dat ik er iets aan heb.
Wat is heb...

Een formulier (bestelbon)
deze bestelbon kan ik filteren naar een report (met dezelfde velden etc.). dat werkt maar op de een of andere manier maakt hij een veld aan in de query en zet daar een criteria op, dat is niet de bedoeling...

........ Vreemd?

de volgende vba's werken niet voor dit probleem de criteria blijft staan

Docmd.acReport, "Raport naam", acSaveNo

Private Sub cmdWisFilter_Click()
Me.Filter = ""
End sub

 

[OctaFish]

En als je het commando uitbreidt met:

Me.Filter=""
Me.FilterOn=False

 

[87122270student]

Oke getest....

Het zat hem in het volgende:
een raport werkt geopend en afgedrukt maar niet afgesloten als ze een ander raport willen printen dan print hij gewoon het openstaande raport.

Daarnaast blijft hij met criterias schrijven bezig kan in de criteria wissen/leegmaken bij het verlaten van het rapport? Bovenstaande is geen oplossing...

 

[OctaFish]

Je kunt deze code

Me.Filter=""
Me.FilterOn=False

zetten in de <Bij sluiten> code van het rapport. Dan zou de filtering moeten worden verwijderd.

 

[87122270student]

Hoi,

Deze oplossing gaf je 2 berichten terug ook.
Ik begrijp dat hij de filter eruit haal maar is dat gelijk aan de criteria?

Ik heb hem erin staan even aankijken wat het doet.

 

[OctaFish]

Deze oplossing gaf ik in de vorige post niet, want toen gaf ik hem als toevoeging op de knop Private Sub cmdWisFilter waarvan je de code had gepost.
Als extra gaf ik dus de tip, om het filter te verwijderen bij de actie Sluiten van het rapport.

Private Sub Report_Close()
     Me.Filter=""
     Me.FilterOn=False
End Sub

Dus niet bij de knop....

 

[87122270student]

Klopt, wellicht ben ik ook niet helder geweest in mijn uitleg.

Inmiddels ben ik wel achter het probleem soms blijft het probleem bestaan dat de filter er niet meer is maar de criteria nog wel blijft staan,

Dit gebeurt wanneer ik het proces van opslaan annuleer dan krijg ik Error 2501.
Als dit gebeurt wil deze criteria nog wel eens in de query blijven hangen, waarop gefiltert is.

Ondanks dit zijn de voorgaande gegeven oplossen wel zinvol.

Waarschijnlijk moet ik iets doen met on error en dan het raport laten sluiten...