HypIsExpense

データ・プロバイダ・タイプ: Essbase

説明

HypIsExpense()は、指定したメンバーが「支出」タグを持っているかどうかを確認します。

構文

HypIsExpense(vtSheetName, vtDimensionName, vtMemberName)

ByVal vtSheetName As Variant

ByVal vtDimensionName As Variant

ByVal vtMemberName As Variant

パラメータ

vtSheetName: 関数を実行するワークシートの名前。vtSheetNameがNullまたはEmptyの場合、アクティブ・ワークシートが使用されます。

vtDimensionName: メンバーの次元。NullまたはEmptyに設定されると、アクティブな次元が使用されます。

vtMemberName: 情報を取得するメンバー。必須; デフォルト値はありません。

戻り値

Variantを戻します。-1はTRUE、0はFALSEです。それ以外の場合は、該当するエラー・コードを戻します。

例

      Declare Function HypIsExpense Lib "HsAddin" (ByVal vtSheetName As Variant, ByVal vtDimensionName As Variant, ByVal vtMemberName As Variant) As Variant

Sub CheckExpense()
vtret = HypIsExpense(Empty, "Measures", "Opening Inventory")
    If vtret = -1 Then
     MsgBox ("Opening Inventory has expense flag set")
    ElseIf vtret = 0 Then
     MsgBox ("Expense flag has not been set")
    Else
     MsgBox ("Error value returned is" & vtret)
    End If 
End Sub