在RIBBON功能区按钮label换行问题，查了无数方法，都不行

lovefox999

按钮label想换行，查了好多方法

1、说加 chr(13)的
2. 说加 
  的
3。说加空格的，加多少空格还有自己摸索的。




以上方法，无一证明，不可行。我是2007，请高手指教。

山菊花

label="自定义
按　钮"

lovefox999

山菊花 发表于 2015-11-4 08:46
label="自定义
按　钮"

奇怪了。我用txt编辑器编辑可以实现换行，为啥用xmlNotepad不行呢？

test.xlsm.zip (18.28 KB, 下载次数: 50)

2015-11-4 12:25 上传

点击文件名下载附件

总版主，顺便看看我的这个问题。

http://club.excelhome.net/thread-1239144-1-1.html
最近在看细品ribbon学习RIBBON，在自定义功能区，想做一个按钮，根据当前工作表是否筛选，控制这个按钮可不可用。一直调试不成功，主要几个问题：1、GetEnabled只有第一次打开Excel文件的时候起作用，无法动态控制。
2、点击按钮后，想把自己不可用grxIRibbonUI.InvalidateControl (control.ID) ，报错。

在XML的GetEnabledl里定义，按钮的getEnabled的回调函数CIS_CancelFilter

'-----------------在模块里定义全局的
Public grxIRibbonUI As IRibbonUI
Sub rxIRibbonUI_onLoad(ribbon As IRibbonUI)
Set grxIRibbonUI = ribbon
End Sub



'----------------回调函数:控制“取消筛选”按钮是否可用
Public Sub CIS_CanCancelFilter(control As IRibbonControl, ByRef returnedVal)
  If ActiveSheet.FilterMode Then returnedVal = True
End Sub


'--------------按钮的onAction回调函数
Public Sub CIS_CancelFilter(control As IRibbonControl)
  If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData
  'grxIRibbonUI.InvalidateControl (control.ID)  '这里报错
End Sub

山菊花

XML开头部分：
<?xml version="1.0" encoding="utf-8"?>
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="rxIRibbonUI_onLoad">

lovefox999

山菊花 发表于 2015-11-4 14:20
XML开头部分：

修改后，可以控制按钮不可用了。但筛选后，如果根据工作表有筛选，让按钮不可用呢？每次都要关闭工作簿。重新打开，才触发getEnabled的事件。

山菊花

附件供参考。

lovefox999

山菊花 发表于 2015-11-4 18:26
附件供参考。

山菊花

估计同时打开了两个文件，两个文件中都有变量grxIRibbonUI。

lovefox999

山菊花 发表于 2015-11-4 20:05
估计同时打开了两个文件，两个文件中都有变量grxIRibbonUI。

没有。我就打开你给的文件啊。

lovefox999

山菊花 发表于 2015-11-4 20:05
估计同时打开了两个文件，两个文件中都有变量grxIRibbonUI。

你看我的截图，底部任务栏就一个EXCEL打开