Use the Smart View VB toolkit and "retrieve" the member formula of a particular member or members with an Excel Function!
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
Member Formula - Excel Formula:
Declare Function HypOtlGetMemberInfo Lib "HsAddin.dll" (ByVal vtSheetName As Variant, ByVal vtDimensionName As Variant, ByVal vtMemberName As Variant, ByVal vtPredicate As Variant, ByRef vtMemberArray As Variant) As Long
Public Function GetMemberFormula(InputVal As Variant) As String
Dim vtMemberName As Variant
Dim vt As Variant
Dim vtRet As Variant
Dim cbItems As Variant
Dim i As Variant
vtMemberName = InputVal
vtRet = HypOtlGetMemberInfo(Null, Null, vtMemberName, 2, vt)
Do Until vt(i) <> ""
If IsArray(vt) Then cbItems = UBound(vt) + 1
For i = 0 To UBound(vt)
Next
Loop
GetMemberFormula = (vt(i))
End Function
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
I read your blog frequently and I just thought I’d say keep up the amazing work!
ReplyDeleteexcel vba training london
Thank you juanjuergens!
Delete