Newbie: Filter w commandbutton

[Jeblanek]

Hi!

I'd like to filter my form, based on a query(called filterhez). I added a command button and I tried to write the code, but the ApplyFilter method doesn't seem to work.

Here is the code:

Dim filt As AllQueries
Set filt = Access.AllQueries("filterhez")

DoCmd.ApplyFilter filt

Please be detailed
THX

 

[mdmilner]

If you go to the built-in help, inside Access, you get this example under ApplyFilter

DoCmd.ApplyFilter , "LastName = 'King'"

A filter just looks like a SQL parameter.
Aka, the part that goes:

"WHERE fieldname1 = 'alpha'"

But you drop the 'WHERE' out of it.

edit - I haven't tested this or used this method (ever actually) - I'm not sure if ApplyFilter forces a screen refresh (it may apply the filter but not change the information in your form.

If it doesn't, do this (in addition) DoCmd.Requery

This forces the form to requery the recordsource - and since you applied the filter, it will do so considering the filter. The above method is not an invalid method, it's just not the one I tend to use. Like many things in life, there's more than one way to approach any given problem - some might be better than others, and then again, all might be equal.

My normal preference is to write a full SQL line as a form recordsource.
aka "SELECT * FROM tblName WHERE fld1 = 'a_value'"

In a single line, I've managed everything, including the filter.

Mike