Returns member relationship information.
EssVGetMemberInfo(sheetName, mbrName, action, aliases) ByVal sheetName As Variant ByVal mbrName As Variant ByVal action As Variant ByVal aliases As Variant
Text name of worksheet to operate on. sheetName is of the form "[Book.xls]Sheet". If sheetName is Null or Empty, the active worksheet is used.
Text name of the member for which relationship information is obtained. This parameter is required because no default value exists.
Number indicating what type of relationship information is returned, as shown in Table 9. If action is Null or Empty, a value of EssChildLevel is used.
See VBA Level Constants.
Boolean indicating whether alias names are returned. If aliases is Null or Empty, False is used.
Returns a string array of member names if successful. Otherwise, it returns an error number indicating failure.
Declare Function EssVGetMemberInfo Lib "ESSEXCLN.XLL" (ByVal sheetName As Variant, ByVal mbrName As Variant, ByVal action As Variant, ByVal aliases As Variant) As Variant Declare Function EssVFreeMemberInfo Lib "ESSEXCLN.XLL" (ByRef memInfo As Variant) As Long Const EssBottomLevel = 3 Sub GetMemberInfo() Dim vt As Variant Dim cbItems As Variant Dim i As Integer Dim pMember As String vt = EssVGetMemberInfo(Null, "Organization", EssBottomLevel, False) If IsArray(vt) Then cbItems = UBound(vt) + 1 MsgBox("Number of elements = " + Str(cbItems)) For i = 0 to UBound(vt) MsgBox("Member = " + vt(i)) Next Else MsgBox("Return Value = " + Str(vt)) End If X = EssVFreeMemberInfo(vt) End Sub