James-
That looks correct.
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 j1eggert
Sent: Wednesday, April 11, 2012 7:23 PM
To: MS_Access_Professionals@yahoogroups.com
Subject: [MS_AccessPros] Re: DateSerial
John,
I think this is what I should have done:
FirstDay = DateSerial(Year(Date), Int((Month(Date) - 1) / 3) * 3 + 1, 1)
Please let me know if this is correct.
Thanks,
James Eggert
--- In MS_Access_Professionals@yahoogroups.com, John Viescas <JohnV@...> wrote:
>
> James-
>
> Looks like the problem is here:
>
> Int ((month(Date())+)/3)*3+1
>
> What did you mean to add to Date() inside the Month function?
>
> 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 j1eggert
> Sent: Wednesday, April 11, 2012 4:50 PM
> To: MS_Access_Professionals@yahoogroups.com
> Subject: [MS_AccessPros] DateSerial
>
>
> I am using Access 2007 and tried to plug the following vba code into the
Control
> Source of a text box, which results in an error:
>
> =DateSerial(Year(Date()), Int ((month(Date())+)/3)*3+1,1)
>
> If some one could point out my error I would really appreciate it.
>
> v/r,
> James Eggert
>
Tidak ada komentar:
Posting Komentar