データ・プロバイダ・タイプ: Essbase、Planning、Financial Management、Hyperion Enterprise
HypIsSmartViewContentPresent()はシートにSmart Viewコンテンツが含まれているかどうかを判別します。
HypIsSmartViewContentPresent(vtSheetName, vtTypeOfContentsInSheet])
ByVal vtSheetName As Variant
ByRef vtTypeOfContentsInSheet
vtSheetName: 関数を実行するワークシートの名前。vtSheetNameがNullまたはEmptyの場合、アクティブ・ワークシートが使用されます。
vtTypeOfContentsInSheet: 出力パラメータ; ワークシート上のコンテンツのタイプを戻します。使用可能な値は次のような列挙型です。
Enum TYPE_OF_CONTENTS_IN_SHEET
EMPTY_SHEET
ADHOC_SHEET
FORM_SHEET
INTERACTIVE_REPORT_SHEET
End Enum
ワークシートにSmart Viewコンテンツが含まれている場合はTrueを戻し、それ以外の場合はFalseを戻します。
Public Declare Function HypIsSmartViewContentPresent Lib "HsAddin" (ByVal vtSheetName As Variant, ByRef vtTypeOfContentsInSheet As TYPE_OF_CONTENTS_IN_SHEET) As Boolean
Sub Example_HypIsSmartViewContentPresent()
Dim Ret As Boolean
Dim vtTypeOfContentsInSheet As TYPE_OF_CONTENTS_IN_SHEET
Dim SheetName As String
Dim SheetDisp As Worksheet
SheetName = Empty
Set SheetDisp = Worksheets("Sheet1")
Ret = HypIsSmartViewContentPresent (Empty, ContentType)
End Sub