Go to the Modules tab
Open a module and paste the following:
Function OpenDSView()
On Error GoTo OpenDSView_Err
DoCmd.OpenForm "Your form name", acFormDS, "", "", , acNormal
OpenDSView_Exit:
Exit Function
OpenDSView_Err:
MsgBox Error$
Resume OpenDSView_Exit
End Function...