導(dǎo)讀 wpsvba插件功能豐富,可以進(jìn)行自定義菜單欄方便我們?nèi)粘^k公,讓效果更高。VBS功能需要提前安裝插件開(kāi)啟,下面一起看看詳細(xì)的wpsvba自定義...
wpsvba插件功能豐富,可以進(jìn)行自定義菜單欄方便我們?nèi)粘^k公,讓效果更高。VBS功能需要提前安裝插件開(kāi)啟,下面一起看看詳細(xì)的wpsvba自定義菜單欄教程吧!
wpsvba怎么自定義菜單欄:
1、vba插件中提供了菜單欄自定義命令功能。
2、使用ComandBar對(duì)象的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
'指定單擊新增的命令時(shí)執(zhí)行的子過(guò)程名稱
.OnAction = "lyq"
.Caption ="測(cè)試""End With
End With
End Sub
Sub lyq()
MsgBox 1
End Sub
5、點(diǎn)擊新增的“測(cè)試”時(shí),將會(huì)執(zhí)行“l(fā)yq”子過(guò)程。