Thanks Guys. I now have the following code
Private Sub Report_Close()
[Forms]![Mainmenu].Visible = True
[Forms]![Reporting].Visible = True
[Forms]![Reporting].SetFocus
End Sub
Private Sub Report_Open(Cancel As Integer)
Me.Visible = True
[Forms]![Mainmenu].Visible = False
[Forms]![Reporting].Visible = False
End Sub
However when I close the report the form Reporting has Focus but I cannot click or key on it. Any help appreciated.