提问
SAP Analysis for Microsoft Office

计划功能宏错误消息

2020-09-06 02:21发布

站内问答 / Others
1797 4 5

点击此处---> 群内免费提供SAP练习系统（在群公告中）加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）嗨，大家好 我为一个按钮分配了...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）


嗨，大家好

我为一个按钮分配了计划序列和Plandatasave命令。

子按钮1002_Click（）

使结果变暗

将lResult1变暗

lResult = Application.Run（" SAPExecutePlanningSequence"，" PS_1"）

lResult = Application.Run（" SAPExecuteCommand"，" PlanDataSave"）

结束子

不幸的是，如果在计划功能执行期间发生错误，则不会显示错误消息。 最后，它将运行Plandatasave功能。 如果我自己运行Planning函数，它将显示整个错误消息。

有人知道我如何捕获Planning函数的整个错误消息并显示出来吗？

当然，我可以将Planning函数和Plandatasave的执行划分为2个不同的按钮。 但是最终用户希望在一个按钮中同时具备两种功能。

4条回答
愤怒的猪头君
2020-09-06 03:06 .采纳回答

您是说一次只收到一个邮件，您就会得到正确的拒绝消息？ 如果将宏分成两个过程并从常规模块中调用它们，会发生什么情况？ 看来您是从工作表模块中调用它们的，这有时会不希望地影响行为。 您还可以在宏中添加一个结尾，以在没有写东西时立即提醒用户。

请参阅示例：

子按钮1002_Click（）
     首先致电Macro
     致电secondMacro

 结束子


 '这两个宏将在公共模块上
 公开子firstMacro（）
     Dim lresult as Long：lresult = Application.Run（" SAPExecutePlanningSequence"，" PS_1"）
         如果lresult = 0，则
                 MsgBox" SapExcecute计划序列失败。所有宏都停止了。"
                 结束
         万一

 结束子


 公共Sub secondMacro（）
     Dim lresult As Long：lresult = Application.Run（" SAPExecuteCommand"，" PlanDataSave"）
         如果lresult = 0，则
                 MsgBox""保存计划数据"操作失败。所有宏都停止了。"
                 结束
         万一

 结束子

一周热门 更多>