Data source types: Essbase
HypIsUDA (vtSheetName, vtDimensionName, vtMemberName, vtUDAString)
ByVal vtDimensionName As Variant
ByVal vtMemberName As Variant
ByVal vtUDAString As Variant
vtSheetName: For future use. Currently the active sheet is used.
vtDimensionName: The name of the dimension where the member belongs.
vtMemberName: The name of the member for which we must test the condition.
vtUDAString: Input string that is compared against the attributes of the member.
Declare Function HypIsUDA Lib "HsAddin" (ByVal vtSheetName As Variant, ByVal vtDimensionName As Variant, ByVal vtMemberName As Variant, ByVal vtUDAString As Variant) As Variant
Sub CheckUDA()
vtret = HypIsUDA(Empty, "Market", "Connecticut", “MyUDA”)
If vtret = -1 Then
MsgBox ("Found MyUDA")
ElseIf vtret = 0 Then
MsgBox ("Did not find MyUDA")
Else
MsgBox ("Error value returned is" & vtret)
End If
End Sub