Finding a User in a Group

wizy_69

Hello
I need help to efficiently find a user in a group without having to loop through each ID. Any suggestions?.
Here is my cirrent code
For i = 1 To ObjGroup.Users.Count
If ObjGroup.Users.Item(i).Name = strStaffID Then
End If
Next i

guido1

Yes there is a more efficient (or at least terse) way. You can use the "Contains" method to search a group's user list for a specific user ID

If your variable ObjGroup is a valid IManGroup in WorkSite you can do this:

Dim isUserInGroup As boolean 

isUserInGroup = ObjGroup.Users.Contains(strStaffID)

if (isUserInGroup) then
MsgBox "User is in group " & ObjGroup.Name
else
MsgBox "User is not in group " & ObjGroup.Name
end if