2020-08-26 20:41发布
点击此处---> 群内免费提供SAP练习系统（在群公告中）加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）你好 是否有可能从宏执行程序包... 显示全部
加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）
你好
是否有可能从宏执行程序包，使其始终执行。
我正在使用VBA代码中的下一个句子：
epm.DataManagerRunPackage" XXXX"，" XXXX"，""
，我想在执行VBA代码时立即执行，而不必按下结束按钮。 （该软件包没有任何提示要填写）
谢谢
要运行的示例代码 Lite Optimize DM软件包：
公共子LOpt（） 昏暗的objAddIn作为COMAddIn 昏暗的epm作为对象 昏暗的AOComAdd作为对象 Dim blnEPM安装为布尔值 出错时出错 '获得用于独立EPM或AO的FPMXLClient的通用代码 对于Application.COMAddIns中的每个objAddIn 如果objAddIn.progID =" FPMXLClient.Connect"，则 设置epm = objAddIn.Object blnEPMInstalled =正确 退出 ElseIf objAddIn.progID =" SapExcelAddIn"然后 设置AOComAdd = objAddIn.Object 设置epm = AOComAdd.GetPlugin（" com.sap.epm.FPMXLClient"） blnEPMInstalled =正确 退出 万一 下一个objAddIn 如果未安装blnEPM，则 讯息框" NO_EPM" 退出子 万一 epm.DataManagerAdvancedRunPackage"/img/CPMB/LIGHT_OPTIMIZE"，"其他功能"，"精简版"，"精简版"，_ "流程链"，""，" 0000"，" C：\ Docs \ Empty.txt" 退出子 呃： 如果Err.Number = -1073479167 MsgBox" NO_CONNECTION" 其他 MsgBox" OTHER_ERROR："和错误说明 万一 结束
C：\ Docs \ Empty.txt-只是空文件！
为了将参数传递给DM提示，请阅读我的博客： https://blogs.sap.com/2017/06/16/simple-vba-function-to-pass-parameters-to-dm-packages /
最多设置5个标签!
{var%20f='http://v.t.sina.com.cn/share/share.php?appkey=1515056452',u=z||d.location,p=['&url=',e(u),'&title=',e(t||d.title),'&source=',e(r),'&sourceUrl=',e(l),'&content=',c||'gb2312','&pic=',e(p||'')].join('');function%20a(){if(!window.open([f,p].join(''),'mb',['toolbar=0,status=0,resizable=1,width=440,height=430,left=',(s.width-440)/2,',top=',(s.height-430)/2].join('')))u.href=[f,p].join('');};if(/Firefox/.test(navigator.userAgent))setTimeout(a,0);else%20a();})(screen,document,encodeURIComponent,'','','http://www.easysap.com/data/attach/logo/logo.png', '推荐 clasier 的问题《没有提示运行或计划的DataManagerRunPackage》','https://www.easysap.com/answer/36448/102286.html','页面编码gb2312|utf-8默认gb2312'));){kind=link}
要运行的示例代码 Lite Optimize DM软件包：
公共子LOpt（） 昏暗的objAddIn作为COMAddIn 昏暗的epm作为对象 昏暗的AOComAdd作为对象 Dim blnEPM安装为布尔值 出错时出错 '获得用于独立EPM或AO的FPMXLClient的通用代码 对于Application.COMAddIns中的每个objAddIn 如果objAddIn.progID =" FPMXLClient.Connect"，则 设置epm = objAddIn.Object blnEPMInstalled =正确 退出 ElseIf objAddIn.progID =" SapExcelAddIn"然后 设置AOComAdd = objAddIn.Object 设置epm = AOComAdd.GetPlugin（" com.sap.epm.FPMXLClient"） blnEPMInstalled =正确 退出 万一 下一个objAddIn 如果未安装blnEPM，则 讯息框" NO_EPM" 退出子 万一 epm.DataManagerAdvancedRunPackage"/img/CPMB/LIGHT_OPTIMIZE"，"其他功能"，"精简版"，"精简版"，_ "流程链"，""，" 0000"，" C：\ Docs \ Empty.txt" 退出子 呃： 如果Err.Number = -1073479167 MsgBox" NO_CONNECTION" 其他 MsgBox" OTHER_ERROR："和错误说明 万一 结束C：\ Docs \ Empty.txt-只是空文件！
为了将参数传递给DM提示，请阅读我的博客： https://blogs.sap.com/2017/06/16/simple-vba-function-to-pass-parameters-to-dm-packages /
一周热门 更多>