求助:菜单和权限,提示找不到功能区 “门店分期管理” 代码如下:求指导!
If User.Group= "内部组" Then
RibbonTabs("门店分期管理").Visible = False
RibbonTabs("Project").Visible = False
RibbonTabs("黔源综合管理").Groups("人事管理").Enabled = False
RibbonTabs("Other").Groups("Execute").Items("Command").Enabled = False
Else
RibbonTabs("门店分期管理").Visible = True
RibbonTabs("Project").Visible = True
RibbonTabs("黔源综合管理").Groups("人事管理").Enabled = True
RibbonTabs("Other").Groups("Execute").Items("Command").Enabled = True
End If
此主题相关图片如下:qq拼音截图未命名.png
此主题相关图片如下:qq拼音截图未命名1.png
[此贴子已经被作者于2015/5/6 14:43:00编辑过]