使用自定义菜单中的module.sub命名约定调用VBA回调时出错 [英] Error calling VBA callbacks using module.sub naming convention from custom menu
本文介绍了使用自定义菜单中的module.sub命名约定调用VBA回调时出错的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
Access 2010
错误: Microsoft Access无法运行宏或回调function'modument_name.sub_name'。
XML:
< customUI xmlns =" http:// schemas .microsoft.com /办公室/ 2006/01 / customui" onLoad =" CallbackOnLoad">
< ribbon startFromScratch =" false">
< tabs>
< tab id =" MyTab" label =" Button Demo">
< group id =" MyGroup"标签= QUOT;按钮演示">
&NBSP;
&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP ; < button id =" MyBtn1"的getSize = QUOT; CallbackGetSize" label ="按钮1" imageMso = QUOT; BevelShapeGallery"
&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP; getKeytip = QUOT; CallbackGetKeytip" onAction =" basButton.MyButtonCallbackOnAction "
&NBSP; getShowLabel =" MyButtonCallbackShowLabel"
getShowImage =" MyButtonCallbackShowImage"
getScreentip = QUOT; CallbackAllgGetItemScreentip" getSupertip =" CallbackAllgGetItemSupertip" />
< button id =" MyBtn2"的getSize = QUOT; CallbackGetSize" getLabel = QUOT; CallbackGetLabel" imageMso = QUOT; BevelShapeGallery"
&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP; getKeytip = QUOT; CallbackGetKeytip"
&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP; getShowImage = QUOT; MyButtonCallbackShowImage"
onAction =" MyButtonCallbackOnAction" />
< ribbon startFromScratch =" false">
< tabs>
< tab id =" MyTab" label =" Button Demo">
< group id =" MyGroup"标签= QUOT;按钮演示">
&NBSP;
&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP ; < button id =" MyBtn1"的getSize = QUOT; CallbackGetSize" label ="按钮1" imageMso = QUOT; BevelShapeGallery"
&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP; getKeytip = QUOT; CallbackGetKeytip" onAction =" basButton.MyButtonCallbackOnAction "
&NBSP; getShowLabel =" MyButtonCallbackShowLabel"
getShowImage =" MyButtonCallbackShowImage"
getScreentip = QUOT; CallbackAllgGetItemScreentip" getSupertip =" CallbackAllgGetItemSupertip" />
< button id =" MyBtn2"的getSize = QUOT; CallbackGetSize" getLabel = QUOT; CallbackGetLabel" imageMso = QUOT; BevelShapeGallery"
&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP; getKeytip = QUOT; CallbackGetKeytip"
&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP;&NBSP; getShowImage = QUOT; MyButtonCallbackShowImage"
onAction =" MyButtonCallbackOnAction" />
解决方案
如果您正在调用公共函数,尝试在呼叫中添加等号。例如:
的OnAction = QUOT; = <强> basButton.MyButtonCallbackOnAction 强>"
希望它能帮助...
Access 2010 using USysRibbons method to display menu tab
Error: Microsoft Access cannot run the macro or callback function 'module_name.sub_name'.
XML:
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="CallbackOnLoad">
<ribbon startFromScratch="false">
<tabs>
<tab id="MyTab" label="Button Demo">
<group id="MyGroup" label="Button Demo">
<button id="MyBtn1" getSize="CallbackGetSize" label="Button 1" imageMso="BevelShapeGallery"
getKeytip="CallbackGetKeytip" onAction="basButton.MyButtonCallbackOnAction"
getShowLabel="MyButtonCallbackShowLabel"
getShowImage="MyButtonCallbackShowImage"
getScreentip="CallbackAllgGetItemScreentip" getSupertip="CallbackAllgGetItemSupertip"/>
<button id="MyBtn2" getSize="CallbackGetSize" getLabel="CallbackGetLabel" imageMso="BevelShapeGallery"
getKeytip="CallbackGetKeytip"
getShowImage="MyButtonCallbackShowImage"
onAction="MyButtonCallbackOnAction"/>
<ribbon startFromScratch="false">
<tabs>
<tab id="MyTab" label="Button Demo">
<group id="MyGroup" label="Button Demo">
<button id="MyBtn1" getSize="CallbackGetSize" label="Button 1" imageMso="BevelShapeGallery"
getKeytip="CallbackGetKeytip" onAction="basButton.MyButtonCallbackOnAction"
getShowLabel="MyButtonCallbackShowLabel"
getShowImage="MyButtonCallbackShowImage"
getScreentip="CallbackAllgGetItemScreentip" getSupertip="CallbackAllgGetItemSupertip"/>
<button id="MyBtn2" getSize="CallbackGetSize" getLabel="CallbackGetLabel" imageMso="BevelShapeGallery"
getKeytip="CallbackGetKeytip"
getShowImage="MyButtonCallbackShowImage"
onAction="MyButtonCallbackOnAction"/>
解决方案
Hi,
If you're calling a public function, try adding an equal sign to the call. For example:
onAction="=basButton.MyButtonCallbackOnAction"
Hope it helps...
这篇关于使用自定义菜单中的module.sub命名约定调用VBA回调时出错的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文