データ・プロバイダ・タイプ: Essbase、Planning (アド・ホックのみ)、Financial Management (アド・ホックのみ)、Hyperion Enterprise (アド・ホックのみ)
HypSetColItems()は、動的リンク問合せのn番目の列のディメンションのメンバーを設定します。n番目の列が存在しない場合は、新しい列が追加されます。
注: | これは、動的リンク問合せを初期化するためにHypGetSourceGridの呼出しがすでに実行されており、アクティブなデータ・プロバイダおよびワークシート上のグリッドに関する情報が格納されていることを前提とします。 |
HypSetColItems (vtColID, vtDimensionName, ParamArray MemberList())
ByVal vtColID As Variant
ByVal vtDimensionName As Variant
ParamArray MemberList() As Variant
vtColID: 列番号n
vtDimensionName: ディメンションの名前
paramarray MemberList: メンバー名のリスト
長整数。正常に終了した場合は0を戻し、それ以外の場合は該当するエラー・コードを戻します。
Declare Function HypSetColItems Lib "HsAddin" (ByVal vtColID As Variant, ByVal vtDimensionName As Variant, ParamArray MemberList() As Variant) As Long
Sub Example_HypSetColItems()
Dim vtGrid As Variant
Sts = HypConnect(Empty, "
Username
", "
Password
", "SalesDemoBasic")
Sts = HypRetrieve(Empty)
Range("B2").Select
Sts = HypGetSourceGrid(Empty, vtGrid)
Sts = HypSetColItems(1, "Market", "East", "West", "South", "Central", "Market")
End Sub