View Single Post
  #5  
Old April 22nd, 2010, 11:20 PM posted to microsoft.public.access.reports
Steve[_77_]
external usenet poster
 
Posts: 1,017
Default Report title based on Date?

Jim,

Put the code on the report's open event.

Steve



"Jim" wrote in message
...
Thanks, both codes work. However, I have to close the report and reopen it
twice before the title displays. Is there something else I need to do?

Jim

"John Spencer" wrote in message
...
IF Format(Forms!frmCommission!cboStartDate,"mmyyyy") =
Format(Forms!frmCommission!cboEndDate,"mmyyyy" THEN

Me.txtTitle = "Commission " & _
Format(Forms!frmCommission!cboStartDate,"mmm/yyyy")
ELSE
Me.txtTitle = "Commission " & _
Forms!frmCommission!cboStartDate & " To " & _
Forms!frmCommission!cboEndDate
END IF

John Spencer
Access MVP 2002-2005, 2007-2010
The Hilltop Institute
University of Maryland Baltimore County

Jim wrote:
I have a report header that fills in the title based on the dates chosen
on a form with this line of code:



Me.txtTitle = "Commission" & " " &
Format(Forms!frmCommission!cboStartDate, "mmmm/yyyy")



It works well, but now I need to look at both cboStartDate and
cboEndDate and if both dates are in the same month, then display that
month. ie: Jan/2010. Or if it's a range of dates like 1/1/10 to 4/1/10,
then have it display Jan 1, 2010 to April 1, 10.



I can display multiple dates with this code:



Me.txtTitle = "Commission" & " " & Forms!frmCommission!cboStartDate & "
" & "To" & " " & Forms!frmCommission!cboEndDate



but I don't know how to tell it to pick the correct code based on the
start and End date.

Thanks for any help.



Jim