Add user to group : Group Account « Access « VBA / Excel / Access / Word






Add user to group

 

Sub AddUserToGroup()

    Dim mySpace As Workspace
    Dim usrMark As User

    Set mySpace = DBEngine(0)
    Set usrMark = mySpace.CreateUser("Mark Fenton")

    mySpace.Groups("Registrars").Users.Append usrMark

End Sub

 








Related examples in the same category

1.Creating a Group Account
2.To create a new group account in the current database
3.Adding a User to a New Group
4.Deleting a Group Account
5.Listing All Group Accounts
6.Listing Users in Groups
7.Creating a Group Account with SQL command
8.Making a User Account a Member of a Group with SQL command
9.Removing a User Account from a Group with SQL command
10.Deleting a User Account with SQL command
11.Granting Permissions for Tables to an Existing Group with SQL command
12.Revoking Security Permissions with SQL command
13.Deleting a Group Account with SQL command
14.Add group