Hi Tom
Sounds like a job for a DLookup! In design view in your report, change the entry in your MonthYear text box to:
=DLookup(“MonthYear”,”qryCreateCalendar”,”MonthYear Is Not Null”)
![]() |
Patch reliability is unclear. Unless you have an immediate, pressing need to install a specific patch, don't do it. |
SIGN IN | Not a member? | REGISTER | PLUS MEMBERSHIP |
Home » Forums » AskWoody support » Productivity software by function » MS Access and database help » Report Header Null for Monthly Calendar (XP)
Edited by HansV to present info in table format.
Goal: Create report giving a monthly calendar with the report header containing the seven days of the week and the month/year.
rptMonthlyCalendar3
The report works for the date 1/1/06 because January 1, 2006 begins on Sunday.
However since other months do not start on Sunday the MonthYear is missing from them.
I could use a text box with the source as [Enter Month Name and Year], but I do not want to include this extra step.
I need code to progress through each record until the field MonthYear is not null and the result is put into the header text box.
qryCreateCalendar
PARAMETERS [Enter first date of month] DateTime;
SELECT tblNos.Nos, IIf(Month([Enter first date of month]+[Nos]-Weekday([Enter first date of month]))=Month([Enter first date of month]),[Enter first date of month]+[Nos]-Weekday([Enter first date of month]),Null) AS CalendarDay, Day([CalendarDay]) AS DayOfMonth, [CalendarDay] AS MonthYear
FROM tblNos
ORDER BY tblNos.Nos;
Results of Query
Nos | CalendarDay | DayOfMonth | WeekdayName | MonthYear |
1 |
Donations from Plus members keep this site going. You can identify the people who support AskWoody by the Plus badge on their avatars.
AskWoody Plus members not only get access to all of the contents of this site -- including Susan Bradley's frequently updated Patch Watch listing -- they also receive weekly AskWoody Plus Newsletters (formerly Windows Secrets Newsletter) and AskWoody Plus Alerts, emails when there are important breaking developments.
Welcome to our unique respite from the madness.
It's easy to post questions about Windows 11, Windows 10, Win8.1, Win7, Surface, Office, or browse through our Forums. Post anonymously or register for greater privileges. Keep it civil, please: Decorous Lounge rules strictly enforced. Questions? Contact Customer Support.
Want to Advertise in the free newsletter? How about a gift subscription in honor of a birthday? Send an email to sb@askwoody.com to ask how.
Mastodon profile for DefConPatch
Mastodon profile for AskWoody
Home • About • FAQ • Posts & Privacy • Forums • My Account
Register • Free Newsletter • Plus Membership • Gift Certificates • MS-DEFCON Alerts
Copyright ©2004-2025 by AskWoody Tech LLC. All Rights Reserved.
Notifications