十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
这篇文章主要介绍“wpsvba如何自定义菜单栏”的相关知识,小编通过实际案例向大家展示操作过程,操作方法简单快捷,实用性强,希望这篇“wpsvba如何自定义菜单栏”文章能帮助大家解决问题。
十年的五指山网站建设经验,针对设计、前端、开发、售后、文案、推广等六对一服务,响应快,48小时及时工作处理。营销型网站建设的优势是能够根据用户设备显示端的尺寸不同,自动调整五指山建站的显示方式,使网站能够适用不同显示终端,在浏览器中调整网站的宽度,无论在任何一种浏览器上浏览网站,都能展现优雅布局与设计,从而大程度地提升浏览体验。成都创新互联公司从事“五指山网站设计”,“五指山网站推广”以来,每个客户项目都认真落实执行。
1、vba插件中提供了菜单栏自定义命令功能。
2、使用ComandBar对象的Controls属性获取所有的命令按钮集合。
3、最后用新增集合元素的方法添加新的菜单命令。
4、下方的代码可以单元格快捷菜单中添加自定义的菜单命令。
Sub xyf()
Dim objCB As CommandBar
’获取单元格右键快捷菜单命令栏
Set objCB= Excel.Application.CommandBars("Cell")
Dim oCBC As CommandBarControl
With objCB
.Reset
’往单元格右键快捷菜单中新增菜单命令
Set oCBC = .Controls.Add(before:=1)With oCBC
'指定单击新增的命令时执行的子过程名称
.OnAction = "lyq"
.Caption ="测试""End With
End With
End Sub
Sub lyq()
MsgBox 1
End Sub
5、点击新增的“测试”时,将会执行“lyq”子过程。
关于“wpsvba如何自定义菜单栏”的内容就介绍到这里了,感谢大家的阅读。如果想了解更多行业相关的知识,可以关注创新互联行业资讯频道,小编每天都会为大家更新不同的知识点。