HypGetColItems

データ・プロバイダ・タイプ: Essbase、Planning (アド・ホックのみ)、Financial Management (アド・ホックのみ)、Hyperion Enterprise (アド・ホックのみ)

説明

HypGetColItems()は、n番目の列のディメンションへの動的リンク・ビューに表示されるメンバーを戻します。

注：	これは、動的リンク問合せを初期化するためにHypGetSourceGridの呼出しがすでに実行されており、アクティブなデータ・プロバイダおよびワークシート上のグリッドに関する情報が格納されていることを前提とします。

構文

HypGetColItems(vtColID, vtDimensionName, vtMemberNames)

ByVal vtColID As Variant

ByRef vtDimensionName As Variant

ByRef vtMemberNames As Variant

パラメータ

vtColID: 列番号n

vtDimensionName: n番目の列のディメンション名を戻します

vtMemberNames: n番目の列のディメンションのメンバーを戻します

戻り値

正常に終了した場合は0を戻し、それ以外の場合は該当するエラー・コードを戻します。

例

      Declare Function HypGetColItems Lib "HsAddin" (ByVal vtColID As Variant, ByRef vtDimensionName As Variant, ByRef vtMemberNames As Variant) As Long

Sub Example_HypGetColItems()
   Dim vtGrid As Variant
   Dim vtDimensionName As Variant
   Dim vtMembers As Variant
   Sts = HypConnect(Empty, "
      UserName
      ", "
      Password
      ", "AnamikaDemoBasic")
   Sts = HypRetrieve(Empty)
   Range ("B2").Select
   Sts = HypGetSourceGrid (Empty, vtGrid)
   Sts = HypGetColItems(1, vtDimensionName, vtMemberNames)
End sub