用于Essbase数据检索的macros

我最终试图自动化/安排从Essbase的数据检索。

我从一个完美的macros开始。 示例代码:

Sheets("Sheet1").Select range("B1:b1").Select ActiveCell = j application.Run macro:="EssMenuVRetrieve" 

这个macros将运行约0.5秒,并完美地检索数据。

接下来,我写了一个.bat和vbScript文件来自动执行这个过程。 但这是行不通的。

一切运行良好,直到EssMenuVRetrieve代码行。 我知道这一点,因为我之前和之后为了testing的目的而将一些文本写入到两个单元格中。

当我运行batch file时,它会根据需要调用macros,将代码执行到EssMenueVRetrieve,然后无限地挂起。 没有数据返回。 它被执行后没有代码。

我无法理解从工作macros到不工作的VBScript的问题。

使用EssMenuVRetrieve方法我没有太多的运气。 看一看Essbase插件附带的函数库。 它应该在ExcelAddin – > bin文件夹下,被称为“essxlvba.txt”(或类似的东西)。 我仔细阅读,成功地提出了一个类似于下面的解决scheme。 它可以与预定的bat脚本完美协作,打开大约15个不同的文件并执行100多次检索。

 Dim wsTar as Worksheet Set wsTar = thisworkbook.sheets("Sheet1") Dim rngTar as Range Set rngTar = wsTar.Range("B1:B1") 'EssVConnect... EssVRetrieve wsTar, rngTar, 1 'this is the line that performs the actual retrieve 'EssVDisconnect