我正在寻找一种在Excel功能区中添加自定义选项卡的方法,该选项卡带有几个按钮.我偶然发现了一些通过谷歌解决它的资源,但看起来都很狡猾,而且非常复杂.
什么是快速简单的方法呢?当我的VBA加载到Excel时,我想要加载新标签.
更新:我从这里尝试了这个例子,但在最后一条指令上得到了"需要对象"错误:
Public Sub AddHighlightRibbon()
Dim ribbonXml As String
ribbonXml = "<mso:customUI xmlns:mso=""http://schemas.microsoft.com/office/2009/07/customui"">"
ribbonXml = ribbonXml + " <mso:ribbon>"
ribbonXml = ribbonXml + " <mso:qat/>"
ribbonXml = ribbonXml + " <mso:tabs>"
ribbonXml = ribbonXml + " <mso:tab id=""highlightTab"" label=""Highlight"" insertBeforeQ=""mso:TabFormat"">"
ribbonXml = ribbonXml + " <mso:group id=""testGroup"" label=""Test"" autoScale=""true"">"
ribbonXml = ribbonXml + " <mso:button id=""highlightManualTasks"" label=""Toggle Manual Task Color"" "
ribbonXml = ribbonXml + "imageMso=""DiagramTargetInsertClassic"" onAction=""ToggleManualTasksColor""/>"
ribbonXml = ribbonXml + " </mso:group>"
ribbonXml = ribbonXml …Run Code Online (Sandbox Code Playgroud)