首页 CMS教程 正文内容

wpsvba怎么自定义菜单栏

36模板 2023-06-08 12:06:27 CMS教程 891 0

wpsvba插件功能丰富,可以进行自定义菜单栏方便我们日常办公,让效果更高。VBS功能需要提前安装插件开启,下面一起看看详细的wpsvba自定义菜单栏教程吧!

wpsvba怎么自定义菜单栏:

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”子过程。

欢迎 发表评论:

请填写验证码
x