John--Duh! Thanks once again! Connie
--- In MS_Access_Professionals@yahoogroups.com, John Viescas <JohnV@...> wrote:
>
> Connie-
>
> Don't you really want to do:
>
> DoCmd.OpenForm "Search_SoldAttributes", , , "SoldDate >= #" & dtYrAgo & "#"
>
> ??
>
> John Viescas, author
> Microsoft Office Access 2010 Inside Out
> Microsoft Office Access 2007 Inside Out
> Building Microsoft Access Applications
> Microsoft Office Access 2003 Inside Out
> SQL Queries for Mere Mortals
> http://www.viescas.com/
> (Paris, France)
>
> ----------------------------------
>
> From: MS_Access_Professionals@yahoogroups.com
> [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of mrsgoudge
> Sent: Thursday, May 24, 2012 11:37 PM
> To: MS_Access_Professionals@yahoogroups.com
> Subject: [MS_AccessPros] Records filtered for one year ago
>
>
> Hi all,
>
> I have a continuous form with a filter by form header. Upon opening the form I
> would like to filter it so that only the last year's worth of records show and
> have the StartSoldDate txtbox in the header have the current date - 1 year. I
> have the header box working (I'm just putting in the date but not creating a new
> filter since it would load completely and then refilter).
>
> The textbox in the form is SoldDate. I can't get it to filter upon loading.
>
> Here's my code:
> Dim dtYrAgo As Date
> dtYrAgo = DateAdd("yyyy", -1, Date)
> DoCmd.OpenForm "Search_SoldAttributes", , , "SoldDate = #" & dtYrAgo & "#"
> Forms!Search_SoldAttributes.tbSoldStartDate = dtYrAgo
>
> Thanks for you help!
> Connie
>
Tidak ada komentar:
Posting Komentar