isladogs,
Thanks for your reply.
I have some basic in vba and I tried this but it didn't work :confused:
Private Sub Form_open()
If Me.OpenArgs() = "Admin" Then
DoCmd.OpenForm "FormPP", acNormal
Else
DoCmd.OpenForm "FormPP", , , "Tarifeerder = GetWinUser()"
DoCmd.GoToRecord , , acNewRec...