Smartview / Essbase VBA功能不返回会员信息

Question

我正在尝试使用GetHypParent（）函数将hyperion / Essbase父名称放在子成员旁边但是我的代码在K列中将0（意味着成功的函数？）与其自身的父名称相对应。如何（或有办法）我可以将父名称放在子名称旁边吗？

Sub Example_HypGetParent（） Dim vtParent As Variant

对于x = 9到20     ActiveSheet.Cells（x，11）= HypGetParent（空，修剪（ActiveSheet.Cells（x，4）），vtParent）

下一个x

End Sub

Answer 1

HypGetParent函数按设计返回一个整数 - 假设调用成功，它会使用父值填充vtParent变量。所以理论上你需要更像这样的东西：

For x = 9 To 20 
    Result = HypGetParent(Empty, Trim(ActiveSheet.Cells(x, 4)), vtParent)
    ActiveSheet.Cells(x, 11) = vtParent
Next x