Unfortunatly that doesnt work.
Form1:
Private Sub bNext_Click()
DoCmd.OpenForm "Form2", , , , , , Me.Form.Name
End SubForm2:
Private Sub Form_Open(Cancel As Integer)
DoCmd.Close acForm, OpenArgs
End SubError:
Run-time error '424':
Object required
EDIT:
I forgot that is should me Me.OpenArgs...