If no one replies to this, I will simply assume that the code on page 361 is incorrect.

I can't get it to work. Here's what the problem is. Because the form is opened in dialog mode, the rest of the code won't run until you close the form. But once you close the form, the combo box on the form is unavailable. So you get an error in the assignment statement where you define strCompany.

I would be curious what the fix is.

The way I got around this problem was to create another form --frmInfoHolder -- with one control -- a textbox. In the Report_Open sub, before opening frmFilterReport, I open frmInfoHolder in hidden windowmode. In the afterupdate event of the combo box on frmFilterReport, I set the textbox on frmInfoHolder equal to the combo box.

That way, there is an open form that retains the value of the combo box when the frmFilterInfo is closed, as it must be to allow the Report_Open sub to continue.

The only other change needed is that the DoCmd.Close needs to close frmInfoHolder, not frmFilterReport.