自定义工具栏 | ExcelOffice【微信公众号：水星Excel】

为什么在vba中给菜单命令栏添加的控件没有显示标题或图形？

2018年8月6日作者：水星Excel

2,066 次浏览暂无评论

在之前的文章中，我们介绍了很多相关的在vba中操作菜单、命令栏的方法。

比如给“菜单命令”中添加一个自定义的命令，可以使用如下的代码：

Sub QQ1722187970()
    Dim oCB As CommandBar
    Set oCB = Excel.Application.CommandBars("Worksheet Menu Bar")
    Dim oCBC As CommandBarControl
    Dim oCBB As CommandBarButton
    With oCB
        .Reset
        '给菜单增加一个命令控件
        Set oCBB = .Controls.Add
    End With
End Sub

1

2

3

4

5

6

7

8

9

10

11

Sub QQ1722187970()

Dim oCB As CommandBar

Set oCB = Excel.Application.CommandBars("Worksheet Menu Bar")

Dim oCBC As CommandBarControl

Dim oCBB As CommandBarButton

With oCB

.Reset

'给菜单增加一个命令控件

Set oCBB = .Controls.Add

End With

End Sub

[……]

阅读全文>>>

如何用vba显示或者关闭“加载项”选项卡?

2018年8月3日作者：水星Excel
3,582 次浏览暂无评论

在设置“自定义功能区”时，看到了一个“加载项”选项卡，但是勾选它之后，并没有在功能区中显示，如图所示：

由于“加载项”选项卡是专门为了兼容excel 2003版本的自定义菜单命令而设置的，单纯的[……]

阅读全文>>>
如何用vba返回excel所有的菜单命令栏控件的id、标题、类型等信息？

2018年8月3日作者：水星Excel
2,483 次浏览暂无评论

在如何用vba代码返回excel应用程序中的所有内置菜单命令栏的名称? 一文中我们介绍了如何用vba返回excel应用程序的所有内置菜单命令栏的名称。

今天我们介绍如何用vba返回excel所有的菜单命[……]

阅读全文>>>
如何用vba删除新增的自定义菜单命令或者恢复原来的菜单栏功能？

2017年6月1日作者：水星Excel
2,875 次浏览暂无评论

如下图所示，

在单元格右键快捷菜单中新增了一个自定义菜单命令“测试”。

每次打开excel文件都会有这个命令，现在如果不需要了，可以CommandBar对象的Reset方法进行重置。[……]

阅读全文>>>
如何用vba返回excel中所有菜单命令栏CommandBar的名称?

2017年2月6日作者：水星Excel
5,962 次浏览暂无评论

命令栏对象为CommandBar。

在office中命令栏包含有菜单栏、工具栏。

由于excel 2007版本开始，微软用ribbon代替了原来常用的菜单栏、工具栏。

所以很多菜单栏、工具栏[……]

阅读全文>>>