wpsvba如何自定义菜单栏

这篇文章主要介绍“wpsvba如何自定义菜单栏”的相关知识,小编通过实际案例向大家展示操作过程,操作方法简单快捷,实用性强,希望这篇“wpsvba如何自定义菜单栏”文章能帮助大家解决问题。

十年的五指山网站建设经验,针对设计、前端、开发、售后、文案、推广等六对一服务,响应快,48小时及时工作处理。营销型网站建设的优势是能够根据用户设备显示端的尺寸不同,自动调整五指山建站的显示方式,使网站能够适用不同显示终端,在浏览器中调整网站的宽度,无论在任何一种浏览器上浏览网站,都能展现优雅布局与设计,从而大程度地提升浏览体验。成都创新互联公司从事“五指山网站设计”,“五指山网站推广”以来,每个客户项目都认真落实执行。

wpsvba自定义菜单栏的方法:

1、vba插件中提供了菜单栏自定义命令功能。

2、使用ComandBar对象的Controls属性获取所有的命令按钮集合。

3、最后用新增集合元素的方法添加新的菜单命令。

wpsvba如何自定义菜单栏

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

wpsvba如何自定义菜单栏

5、点击新增的“测试”时,将会执行“lyq”子过程。

关于“wpsvba如何自定义菜单栏”的内容就介绍到这里了,感谢大家的阅读。如果想了解更多行业相关的知识,可以关注创新互联行业资讯频道,小编每天都会为大家更新不同的知识点。


网站名称:wpsvba如何自定义菜单栏
转载来源:http://scyanting.com/article/pdpges.html