データ・プロバイダ・タイプ: Essbase、Planning (アド・ホックのみ)、Financial Management (アド・ホックのみ)、Hyperion Enterprise (アド・ホックのみ)
HypRemoveOnly()は、ワークシートで選択されたメンバーのみを削除します。
選択にはメンバー・セルのみを含める必要があります。データ・セルは選択できません。
HypRemoveOnly(vtSheetName, vtSelection)
ByVal vtSelection As Variant
vtSheetName: 関数を実行するワークシートの名前。vtSheetNameがNullまたはEmptyの場合、アクティブ・ワークシートが使用されます。
vtSelection: 削除するメンバーを参照する範囲オブジェクト。選択がNullまたはEmptyの場合、アクティブなセルが使用されます。
正常に終了した場合は0を戻し、それ以外の場合は該当するエラー・コードを戻します。
1つのメンバー名のみを削除するには:
Public Declare Function HypRemoveOnly Lib "HsAddin" (ByVal vtSheetName As Variant, ByVal vtSelection As Variant) As Long Sub Example_HypRemoveOnly() X=HypRemoveOnly(Empty, RANGE("D2")) If X = 0 Then MsgBox("Remove Only successful.") Else MsgBox("Remove Only failed." + X) End If End Sub
複数のメンバー名を削除するには:
Public Declare Function HypRemoveOnly Lib "HsAddin" (ByVal vtSheetName As Variant, ByVal vtSelection As Variant) As Long Sub Example_HypRemoveOnly() X=HypRemoveOnly(Empty, RANGE("D2, A5")) If X = 0 Then MsgBox("Remove Only successful.") Else MsgBox("Remove Only failed." + X) End If End Sub