自定义Ribbon按钮，能用程序改变按钮名称吗？

abiao · 发表于 2023-3-19 13:09

用XML制作的Ribbon按钮，都是静态的，固定在xml文件中，想用VBA程序动态改变初始的按钮文字，能行吗？

桑特容易额 · 发表于 2023-3-19 13:26

xml 文件
<button id="test" getLabel="returnName" size="large" />
vb模块回调
Sub returnName(Control As IRibbonControl, ByRef returnedVal) ‘getLabel声明的ID
returnedVal = “动态名称”
End Sub
回调的名称更改后需要写MyRibbon.Invalidate进行刷新

山菊花 · 发表于 2023-3-19 14:40

设置getLabel回调。

abiao · 发表于 2023-3-19 18:07

非常感谢，能设置对吧？
楼上版主，能否稍微详细一点，譬如xml里的按钮是：
<button id="a" size="large" imageMso="HappyFace" label="我要变" onAction="xx" ...
我要一开始就把按钮设置成【abc】，要怎么加回调函数？

山菊花 · 发表于 2023-3-19 18:15

供参考。

《RibbonX：自定义Office 2007功能区》学习心得
https://club.excelhome.net/thread-709306-1-1.html
(出处: ExcelHome技术论坛)

abiao · 发表于 2023-3-21 23:09

谢谢楼上的，谢谢版主，搞定。各种get：getLabel、getVisible。

abiao · 发表于 2023-3-24 11:55

getLabel是搞定了用程序改变标题的问题了，可出现了新的问题：这个getLabel函数（事件）是在啥时候执行的？好像不只执行一次，一开始动态改变，没问题，但用着用着，标签变了。
我是在onLoad中设置，把标签名称存到全局数组中，然后在各自的getLabel里设置标签名称，可经过一些操作后，发现标签变空了，我想是以后执行了getLabel，但没执行onLoad，数组中是空。
这得怎么办？我只想让getLabel执行一次。

smsn · 发表于 2023-3-25 20:49

本帖最后由 smsn 于 2023-3-26 12:02 编辑

用这个软件试试https://club.excelhome.net/thread-1655755-1-1.html

		自动登录	找回密码
密码			免费注册

[求助] 自定义Ribbon按钮，能用程序改变按钮名称吗？