This method will always work report open or not:
DoCmd.OpenReport "ReportName", acViewPreview, , , acHidden
Reports!ReportName.Filter = "RecordID = " & RecordID
Reports!ReportName.FilterOn = True
DoCmd.OpenReport "ReportName", acViewPreview
Good luck, JLC.