Quarterly start and end dates

[gmazza via AccessMonster.com]

Hi there,
I have a parameter report and I have 4 buttons, each button representing each
quarter.
I have 2 text fields on the form, one being a start date and one being an end
date.
When I click a button, say Q1, I need the Start Date to say: 01/01/2009 and
the End Date to say 31/03/2009
etc for all the rest of the buttons for each quarter.
What is the correct syntax for a quarter?
Thanks for your help!

 

[KARL DEWEY]

If you only need current year quarters then try this using option group
values 1 through 4 instead of buttons --
Quarter Start:
DateAdd("q",[Forms]![YourForm]![Frame0]-1,DateSerial(Year(Date()),1,1))

Quarter End:
DateAdd("q",[Forms]![YourForm]![Frame0],DateSerial(Year(Date()),1,1)-1)

 

[gmazza via AccessMonster.com]

My employer requires buttons for some reason.
The code would be different for a button, right?

If you only need current year quarters then try this using option group
values 1 through 4 instead of buttons --
Quarter Start:
DateAdd("q",[Forms]![YourForm]![Frame0]-1,DateSerial(Year(Date()),1,1))

Quarter End:
DateAdd("q",[Forms]![YourForm]![Frame0],DateSerial(Year(Date()),1,1)-1)

Hi there,
I have a parameter report and I have 4 buttons, each button representing each

[quoted text clipped - 6 lines]

What is the correct syntax for a quarter?
Thanks for your help!

 

[Marshall Barton]

Hi there,
I have a parameter report and I have 4 buttons, each button representing each
quarter.
I have 2 text fields on the form, one being a start date and one being an end
date.
When I click a button, say Q1, I need the Start Date to say: 01/01/2009 and
the End Date to say 31/03/2009
etc for all the rest of the buttons for each quarter.
What is the correct syntax for a quarter?

Try using the DateSerial function in the buttons' code. I
think the first quarter button's code would be like:

Me.txtStartDate = DateSerial(Year(date),1,1)
Me.txtEndDate = DateSerial(Year(date),4,0)

 

[KARL DEWEY]

An Option Group can display buttons, checkboxes, or toggle buttons - you
select which.

My employer requires buttons for some reason.
The code would be different for a button, right?

If you only need current year quarters then try this using option group
values 1 through 4 instead of buttons --
Quarter Start:
DateAdd("q",[Forms]![YourForm]![Frame0]-1,DateSerial(Year(Date()),1,1))

Quarter End:
DateAdd("q",[Forms]![YourForm]![Frame0],DateSerial(Year(Date()),1,1)-1)

Hi there,
I have a parameter report and I have 4 buttons, each button representing each

[quoted text clipped - 6 lines]

What is the correct syntax for a quarter?
Thanks for your help!

 

[gmazza via AccessMonster.com]

Worked perfect, thanks for the help guys!

Hi there,
I have a parameter report and I have 4 buttons, each button representing each

[quoted text clipped - 5 lines]

etc for all the rest of the buttons for each quarter.
What is the correct syntax for a quarter?

Try using the DateSerial function in the buttons' code. I
think the first quarter button's code would be like:

Me.txtStartDate = DateSerial(Year(date),1,1)
Me.txtEndDate = DateSerial(Year(date),4,0)