Holde Admin ude af form

If environ("username") = "Admin" then Docmd.OpenForm "Formen"

Not sure how you are opening the form but if you open it using a button then you can use this code in the buttons on click event.

Another idea would to use this in the froms On Open event

If Environ("username") = "admin" Then Cancel = True

Jeg har afprøvet dine forslag således:

Private Sub Form_Open(Cancel As Integer)


    If Environ("username") <> "Bruger1" Then
    DoCmd.OpenForm "Kopi af Kontaktpersoner"
    Else
    DoCmd.Close
    DoCmd.Quit
    End If
   
End Sub
---
Men noget er galt for fortolkeren kører videre og lukker access ned selvom jeg logger på med "Bruger 2"

Private Sub Form_Open(Cancel As Integer)

    If CurrentUser <> "Admin" Then
    DoCmd.OpenForm "Kopi af Kontaktpersoner"
    Else
    MsgBox "Din genvej er ikke opsat korrekt. Kontakt EDB-service"
    DoCmd.Close
    DoCmd.Quit
    End If
   
End Sub
---
Det virker. Tak Terry. Du får pointene.

selv tak