wpsvba怎么自定义菜单栏

办公教程导读

收集整理了【wpsvba怎么自定义菜单栏】办公软件教程，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含540字，纯文字阅读大概需要1分钟。

办公教程内容图文

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怎么自定义菜单栏】办公软件教程的全部内容，希望文章能够帮你了解办公软件教程wpsvba怎么自定义菜单栏。
如果觉得办公软件教程内容还不错，欢迎将网站推荐给好友。