Tag: callback

无法使Excel自定义function区callback工作: 我试图创build一个button，我想要显示在我的自定义选项卡上，指示用户是否具有最新版本的Excel加载项。我打算检查他们是否有最新版本，只要用户打开一个Excel实例，将最初Last Modified的xlam文件写入文件。然后，在Workbook_Open事件中，我将启动一个OnTime操作，以便将文件中写入的date和时间与公共文件的Last Modified每15分钟）进行比较。这是为了防止用户在部署更新时打开任何Excel实例，因为他们必须closures所有实例，然后重新打开Excel以获得最新版本。无论如何，有了这样的背景，我遇到了状态button的callback问题。我的想法是让button显示一个绿色的检查，并且在最初打开excel时有一个最新的标签，因为在这种情况下，Excel将具有当前版本，而不是保存在临时文件中的caching版本。然后，如果当updateCheck子触发它发现更新的版本可用我想要更改button图像感叹号和标签更新。问题是，似乎每当我尝试通过使用自定义用户界面编辑器的button元素（除默认的onAction ）上的任何callbackfunction区不再显示在Excel中。如果我没有任何callback的button，只有在function区本身的onLoadcallback，那么function区显示正常打开Excel和onLoad事件触发（用MsgBoxtesting）。以下是我的XML和VBA代码在Module1中： Public myRibbonUI As IRibbonUI 'Callback for customUI.onLoad Sub RibbonLoaded(ribbon As IRibbonUI) Set myRibbonUI = ribbon MsgBox ("Ribbon Loaded") End Sub 'Callback for customButton getImage Sub GetButtonImage(control As IRibbonControl, ByRef returnedVal) MsgBox (returnedVal) End Sub 'Callback for customButton getLabel Sub GetButtonLabel(control […]

从Excel调用VB.NET代码: 我从VB.Net打开Excel工作簿，然后在工作簿中想要一个事件（如按下button）来激活VB.Net中的代码。我如何完成这种types的callback？

RibbonControl属性callback（getPressed，getSupertip等）永不更新: 虽然可以直接设置一些办公室function区控件属性（如标签），但大多数都使用callback来设置属性。例如一个button的图像： <button id="btnRecalculate" getImage="GetRibbonControlImage" label="Recalculate Now" onAction="OnButtonAction" size="normal" /> 文档在这些callback的语法上非常清晰，而不是在什么时候调用这些callback。我现在面临的一个问题是，当编程改变一个值时，我想修改function区上的一个属性（例如button上的工具提示）。我有一个为supertip定义的callback，如下所示： <button id="btnSetServerURL" getSupertip="GetSuperTip" label="Set Server URL" /> 和代码隐藏： public string GetSuperTip(IRibbonControl control) { switch( control.Id ) { case "btnSetServerURL": return "Click to set the server URL. (Currently: " + API.URL + ")"; default: return ""; } } 当URL被改变时，下一次用户将鼠标移动到该button上时，我希望调用GetSuperTipcallback，并显示正确的当前URL，但是现在这个值只是第一次被设置，而不会再次被设置。有什么办法可以得到我所寻求的行为吗？这是一个Excel加载项，所以据我所知WPF样式绑定不是一个选项。

如何在XMLHTTP onTimeOut时使用VBAcallback函数？: 我试图从Web服务器获取XML数据到Excel，然后我写了一个sendRequest函数在Excel中调用 =sendRequest("http://abb.com/index.php?id=111") 当networking服务器有问题时，无法连接或找不到，excel没有响应，太可怕了！为了避免这种情况，我认为我们应该设定时间输出。这些是我的function： Function sendRequest(Url) 'Call service Set XMLHTTP = CreateObject("Msxml2.ServerXMLHTTP.6.0") 'Timeout values are in milli-seconds lResolve = 10 * 1000 lConnect = 10 * 1000 lSend = 10 * 1000 lReceive = 15 * 1000 'waiting time to receive data from server XMLHTTP.setTimeOuts lResolve, lConnect, lSend, lReceive XMLHTTP.OnTimeOut = OnTimeOutMessage 'callback function […]