ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 1646|回复: 14

[求助] 如何运用Ribbon XML Editor工具制作下拉菜单

[复制链接]

TA的精华主题

TA的得分主题

发表于 2024-2-7 15:57 | 显示全部楼层 |阅读模式
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

老师们好!
如何运用Ribbon XML Editor工具制作下拉菜单

如图:
哪位老师有这种XML代码,请分享下,谢谢老师们了!
QQ截图20240207155505.jpg
QQ截图20240207155406.jpg


TA的精华主题

TA的得分主题

发表于 2024-2-7 19:36 | 显示全部楼层
xml代码:
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="rxIRibbonUI_onLoad">
        <ribbon startFromScratch="false">
                <tabs>
                        <tab id="rxtabCustom1" label="My TAB1" insertBeforeMso="TabHome">
                                <group id="rxgrp6" label="程序列表控件">
                                        <menu label="程序列表选项" id="rxmenu1" imageMso="AppointmentColorDialog" supertip="http://excelbbx.net" screentip="Excelbbx" size="large">
                                                <button label="试验1" id="rxmenu1btn1" imageMso="AddressBook" onAction="rxmenu1btn1_Chick" supertip="试验1" screentip="试验1123123"/>
                                                <menuSeparator id="分隔条001"/>
                                                <button label="试验2" id="rxmenu1btn2" imageMso="AutoFormatChange" onAction="rxmenu1btn2_Chick" supertip="试验2" screentip="提示"/>
                                                <menuSeparator id="分隔条002"/>
                                                <button label="试验3" id="rxmenu1btn3" imageMso="ClipArtInsert" onAction="rxmenu1btn3_Chick" supertip="试验3" screentip="提示"/>
                                                <menuSeparator id="分隔条003" title="分隔条加内容"/>
                                                <button label="试验4" id="rxmenu1btn4" imageMso="ChartTypeColumnInsertGallery" onAction="rxmenu1btn4_Chick" supertip="试验4" screentip="提示"/>
                                                <menuSeparator id="分隔条004"/>
                                                <button label="试验5" id="rxmenu1btn5" imageMso="Chart3DPieChart" onAction="rxmenu1btn5_Chick" supertip="试验5" screentip="提示"/>
                                                <menuSeparator id="分隔条005"/>
                                        </menu>
                                </group>
                        </tab>
                </tabs>
        </ribbon>
</customUI>

评分

3

查看全部评分

TA的精华主题

TA的得分主题

发表于 2024-2-7 19:43 | 显示全部楼层
简单做了一个,请自行修改,xml 文件代码审核中。。。
2024-02-07_194118.png

test.rar

12.89 KB, 下载次数: 39

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2024-2-8 08:19 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-2-8 10:01 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
谢谢各位老师的帮助!!!

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-2-8 14:14 | 显示全部楼层
gwjkkkkk 发表于 2024-2-7 19:43
简单做了一个,请自行修改,xml 文件代码审核中。。。


老师你好,怎么设置,这个选项卡的位置
我做出来,是放在最后的
老师那个是放在第二个位置的
QQ截图20240208141413.jpg

TA的精华主题

TA的得分主题

发表于 2024-2-8 16:10 | 显示全部楼层
<tab id="rxtabCustom1" label="My TAB1" insertBeforeMso="TabHome">

insertBeforeMso 这个是Tab 位置  默认是最后的

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2024-2-8 17:49 | 显示全部楼层
闻启学 发表于 2024-2-8 16:10
insertBeforeMso 这个是Tab 位置  默认是最后的

正确,xml 文件中删除 insertBeforeMso="TabHome" 即可。

评分

1

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-2-20 11:08 | 显示全部楼层
gwjkkkkk 发表于 2024-2-8 17:49
正确,xml 文件中删除 insertBeforeMso="TabHome" 即可。

老师新年好!
我这个加了二个自启动宏

怎么每一个宏要运行二次
麻烦老师帮我看下,谢谢老师了

打开EXCEL文件就能看出问题了
谢谢老师了
提示二次.rar (36.95 KB, 下载次数: 14)

TA的精华主题

TA的得分主题

发表于 2024-2-20 21:20 | 显示全部楼层
yjwdjfqb 发表于 2024-2-20 11:08
老师新年好!
我这个加了二个自启动宏

你指弹了4次?我这里弹了2次,没看出来问题。。。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-12-25 16:15 , Processed in 0.034868 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表