Report title based on Date?
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
|