A97 - Report Manager Form with Filter Buttons
Posted on 2000-03-05
I wish to have a form with an unbound field to show specific reports based on several filter buttons, i.e.:
Form Report Buttons: General, Management, etc...
If the "General" button was pressed, all reports designated, as "GEN" would show in the unbound field.
Progress to date:
ReportName text User friendly name for user to view
ReportType text Reports by prefix: rpt, srpt etc...
Calls text Name of the item to call or refer to
ShortDesc text Short Description
UsageTips Memo General tips to guide the user
ReportCategory text Category used for Filtering, i.e. GEN, MGMT, INV, etc ...
Remarks text General Remarks for later updates etc...
Buttons on the left: General Reports, Management Reports, etc...
Unbound Field on the right:
Row Source Type: Table/Query
Row Source: qryReportList
Field on top of Unbound Field: (This field simply shows the selected item in a bold text)
Control Source: =[ReportList].[Column](0)
To continue to make a short story long, I can not seem to get the buttons on the Report Manager form to filter the items in the unbound field
I wish to keep the unbound field blank, until one of the buttons is depressed to filter the reports.
For each button's On Click Event procedure I run the following:
********** Code Starts **********
Private Sub BtnGeneral_Click()
On Error GoTo BtnGeneral_Click_Err
Forms!ReportMgr!BtnGeneral = "GEN"
DoCmd.ApplyFilter "", "[qryReportList]![ReportType]=""GEN"""
********** Code Ends **********
Any help would be greatly appreciated.