首页 > 解决方案 > 使用 VBA 在 Excel 加载项 (Jedox) 中运行按钮

问题描述

我有以下简单的 Excel 电子表格:

      A             B       
1    Revenue       5.000    =PALO.DATAC("Jedox Server";"P&L";"Revenue")
2    Costs        -3.000    =PALO.DATAC("Jedox Server";"P&L";"COSTS")
3    Profit        2.000    =SUM(B1:B2)
4
5

正如您在单元格中看到的那样,B1B2正在使用 BI-Tool https://www.jedox.com/en/Revenue插入Costs.OLAP-Cube

到目前为止,这一切都完美无缺。


使用 BI-Tool 的 Excel-Add-In,我还可以创建一个所谓的OLAP Screenshot

在此处输入图像描述

当我单击此按钮时,将创建一个新文件,其中删除单元格 B1B2中的公式,并且仅显示值(在本例中为:5.000-3.000)。

现在,我希望我可以用 VBA 代码触发这个按钮。像这样的东西:

Sub OLAP_Screenshot()
Go to Excel-Addin "Jedox"
Click on "Speichern als Snapshot"
End Sub

您知道 VBA 代码必须是什么样子才能激活 BI-Tool 中的此按钮吗?

标签: excelvbabusiness-intelligencejedox

解决方案


一个简单的解决方案是映射快捷方式:

SendKeys ("%Y1D"), True

其中 %= alt,激活键盘快捷键 Y1= 功能区快捷键(更改为 Jedox 插件的映射) D = 按钮快捷键(更改为 Speichern als Snapshot 按钮的映射)

警告:只有在没有其他选项可用时才应该使用 SendKeys 方法,因为如果在代码运行时错误的窗口处于活动状态,它可能会导致问题。

或者查看 VBA 对象库并添加:工具>参考>Jedox

从这里看起来像:(我没有安装插件)

Sub SAS

Dim Jedox As JedoxExcelAddIn
Set Jedox= Application.COMAddIns.Item("Jedox.ExcelAddIn").Object
Jedox.'Speichern als Snapshot'

End Sub

推荐阅读