主题：请教

1、没错，应该用UserGroup，如果中途要求换用户，应该设置在LoadUserSetting事件，代码改为：

Select Case User.Name
    Case "操作部经理","操作部","行政部"
         Tables("业务角色").Visible = False

    Case Else

        Tables("业务角色").Visible = True
End Select

2、按照mr725兄说的设置。