導(dǎo)航菜單

wpsvba怎么自定義菜單欄

導(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ò)程。

免責(zé)聲明:本文由用戶上傳,如有侵權(quán)請(qǐng)聯(lián)系刪除!

猜你喜歡:

最新文章: