使用VBscript调用和刷新Office for Analysis(AO)文件中的数据

2020-09-06 06:33发布

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

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


您好里根·麦克唐纳

对我来说,使用VBscript无法调用和刷新Analysis for Office(AO)文件中的数据

以下是脚本无法正常工作

显式选项

Dim xl

Dim xlBook

set xl = createobject(" Excel.Application")

xl.Application.Visible = True

xl.DisplayAlerts = False

设置xlBook = xl.Workbooks.Open(" \\ nzww.nzcorp.net \ NZfileshares \ NZSITES \ INBE \ DepShares \ NZIN_FS_POC \ Automation Project-2017 \ Sample Testing \ Alert Report_Gran TEDA.xlsm",0,false)

xl.Application.run" Alert_AAO"

xlBook.save

xl.ActiveWindow.close True

xl.Quit

设置xlBook =否

设置xl =不显示

请提供一些其他解决方案

投降

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

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


您好里根·麦克唐纳

对我来说,使用VBscript无法调用和刷新Analysis for Office(AO)文件中的数据

以下是脚本无法正常工作

显式选项

Dim xl

Dim xlBook

set xl = createobject(" Excel.Application")

xl.Application.Visible = True

xl.DisplayAlerts = False

设置xlBook = xl.Workbooks.Open(" \\ nzww.nzcorp.net \ NZfileshares \ NZSITES \ INBE \ DepShares \ NZIN_FS_POC \ Automation Project-2017 \ Sample Testing \ Alert Report_Gran TEDA.xlsm",0,false)

xl.Application.run" Alert_AAO"

xlBook.save

xl.ActiveWindow.close True

xl.Quit

设置xlBook =否

设置xl =不显示

请提供一些其他解决方案

投降

付费偷看设置
发送
5条回答
追夢秋陽
1楼-- · 2020-09-06 06:48

大家好,

很高兴将其保留下来,很有用。

我使用Excel的新实例的主要原因是在早期使用BEX和Analysis for Office。 在excel的同一会话中在这两个加载项之间来回切换非常不可靠,并且经常会出现问题。

每次都重新开始一个新的操作完全可以解决该问题。

如果您现在仅使用一种方法,则实际上不需要新的会话。

干杯

Regan

Climb_Ma
2楼-- · 2020-09-06 06:48

感谢您的解释。

落灬小鱼
3楼-- · 2020-09-06 07:02

以最简单的形式,这就是我从VBscript调用某些内容并在其中运行宏的方式。/p>

它对我来说适用于各种文件。

所有文件都位于.vbs文件中。

您不一定需要触发一个新的Excel实例,但是我发现它有助于提高稳定性,还可以同时运行多个脚本,因为它们都可以在自己的Excel实例中运行。

 Dim xl
 Dim xlBook
 
 '打开Excel并使其可见。 如果不可见,则SAP Analysis for Office插件不起作用
 设置xl = CreateObject(" Excel.application")
 xl.Application.Visible = True
 xl.DisplayAlerts = False
  
 '现在加载我们要刷新的文件。
 设置xlBook = xl.Workbooks.Open(" <此处为完整路径和文件名> .xlsm",0,否)
 xl.Application.run" <已加载文件中宏的名称>"
  
 '保存并关闭文件而不提示用户
 xlBook.save
 xl.ActiveWindow.close True
  
 '关闭Excel
 退出
  
 '清除内存
 设置xlBook = Nothing
 设置xl =否
 
My梦
4楼-- · 2020-09-06 06:59

上面的代码也不起作用

jovirus
5楼-- · 2020-09-06 06:48

对于第一个,错误告诉您哪里出了错。

对于第二个错误,您看到什么具体错误?

一周热门 更多>