EssVGetDataPoint

Description

Gets member information for one data cell.

Syntax

EssVGetDataPoint (sheetName, cell, range, aliases)
By Val sheetName As Variant
By Val cell As Variant
By Val range As Variant
By Val aliases As Variant

Parameters

sheetName

Text name of the worksheet containing the currency information. sheetName is of the form "[Book.xls]Sheet". If sheetName is Null or Empty, the active worksheet is used.

cell

Cell name that describes the reference cell to get the member combination information for.

range

Range name that describes the reference area of the data used as the source of the retrieve.

aliases

Boolean value that indicates whether alias names are returned.

Return Value

Returns an array of member names.

Example

Declare Function EssVGetDataPoint Lib "ESSEXCLN.XLL" (ByVal sheetName As Variant, ByVal cell As Variant, ByVal range As Variant, ByVal aliases As Variant) As Variant

Declare Function EssVFreeDataPoint Lib "ESSEXCLN.XLL" (ByVal Info As Variant) As Long

Sub DataPointsSub()
Dim vt As Variant
Dim cbItems As Variant
Dim i As Integer
Dim pMember As String
vt = EssVGetDataPoint(Null, range("B3"), range("A1:F7"), False)
If IsArray(vt) Then
cbItems = UBound(vt) - LBound(vt) + 1
MsgBox ("Number of elements = " + Str(cbItems))
For i = LBound(vt) To UBound(vt)
MsgBox ("Member = " + vt(i))
Next
X = EssVFreeDataPoint(vt)
Else
MsgBox ("Return Value = " + Str(vt))
End If
End Sub