Micha:
Here is a copy of all the VBA I'm using right now.

right now access is telling me it can not find my report classlist. But it is listed in my list of reports on the left side of my screen.
Private Sub Command53_Click()


DoCmd.OpenReport "classlist", , , "[programnumber]= '" & PROGRAMSELECTION & "'"
Reports!classlist.RecordSource = "select * from " & PROGRAMSELECTION & ""
End Sub

The report does open and prints a header but no data.

I now get error code 2451 which says the report name has been changed or doesn't exist. Yet the report shows on the left side of the screen.

let me know if you would like me to send you the db or screen shots of what's going on. and how to send them.

Thanks