Whoops. Small typo OpenReport not OpemReport. Also the quote marks are not
needed and will lead to an error when Access looks for a report named
"MyCrypticReportName" (including the quote marks)instead of
MyCrypticReportName with no extraneous quote marks.
To immediately print the report
DoCmd.OpenReport Me.[NameOfListbox], acViewNormal
or to open the report in preview mode
DoCmd.OpenReport Me.[NameOfListbox], acViewPreview
John Spencer
Access MVP 2002-2005, 2007-2010
The Hilltop Institute
University of Maryland Baltimore County
Build a table of report names:
TblReportName
CryticName
UserFriendlyName
Make this table the Rowsource of your listbox. Set the Bound Column = 1,
Column Count = 2 and Column Width = 0, 3. The listbox will display the user
friendly names but the selected report will return the cryptic name. Put the
following code in the AfterUpdate event of the listbox:
DoCmd.OpemReport """" & Me!NameOfListBox & """"
Steve
(e-mail address removed)