北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |
积分不足,可支付宝或微信红包,200聊表感谢。
想设置一个功能区,然后用自己本地文件夹中图标,同时可以根据登陆用户所属的用户组权限来控制菜单的显示与可用。
1.XML自定义功能区,用getimage设置动态的图标(不想用微软自带的)一直不成功,提示不能运行回调函数getimages。详见附件求助:ribbon功能区自定义本地图片和菜单权限控制。
xml设置如下
--------------------------------------------------------------------------------------------------
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
<ribbon startFromScratch="true">
<tabs>
<tab id="新功能区" label="新功能区" visible="true">
<group id="数据维护" label="数据维护">
<button id="product" label="产品主数据" getImage="getImages" tag="ga.ico" onAction="打开窗体1"/>
<button id="sales" label="销售主数据" imageMso="HappyFace" onAction="打开窗体1"/>
</group>
</tab>
</tabs>
</ribbon>
</customUI>
--------------------------------------------------------------------------------------------------
getimages回调函数
--------------------------------------------------------------------------------------------------
Public Sub getImages(control As IRibbonControl, ByRef image)
Set image = LoadPicture(getAppPath & control.Tag) '这里如果改直接引用本地地址应该也可以
End Sub
Public Function getAppPath() As String
getAppPath = Left(CurrentDb.Name, Len(CurrentDb.Name) _
- Len(Dir(CurrentDb.Name)))
End Function
--------------------------------------------------------------------------------------------------
2.想通过getEnabled="myGetEnabled"来设置根据不同用户组分配不同的菜单可用权限,也没成功。
myGetEnabled的回调函数写的一直出问题,就不贴了。